Help for this page

Select Code to Download

Select or download this

knoppix@Microknoppix:~$ perl -E '
> $str = q{banana};   
...
3
banana
knoppix@Microknoppix:~$