You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
11 lines
217 B
Perl
11 lines
217 B
Perl
5 years ago
|
#!C:/perl/bin
|
||
|
|
||
|
$word = 'Lengthy';
|
||
|
|
||
|
print "Before chop = $word \n";
|
||
|
|
||
|
$word2 = chop($word);
|
||
|
|
||
|
print "Result of the chop function after chop = $word2 \n\n";
|
||
|
print "Original string \$word after chop = $word \n";
|