Help for this page

Select Code to Download

Select or download this

$line = "\n";
print(length($line), "\n");
$line =~ s/\s+$//;
print(length($s), "\n");