Help for this page

Select Code to Download

Select or download this

c:\@Work\Perl\monks\marek1703>perl -wMstrict -le
"my $s = '-#-$-%-&-~-_-}-{-^-0-$%&~_}{^0';
...
"
'-#-$-%-&-~-_-}-{-^-0-$%&~_}{^0'
'-\#-\$-\%-\&-\~-\_-\}-\{-\^-0-\$\%\&\~\_\}\{\^0'

Select or download this

c:\@Work\Perl\monks\marek1703>perl -wMstrict -le
"my $s = '-#-$-%-&-~-_-}-{-^-0-$%&~_}{^0';
...
"
'-#-$-%-&-~-_-}-{-^-0-$%&~_}{^0'
'-\#-\$-\%-\&-\~-\_-\}-\{-\^-0-\$\%\&\~\_\}\{\^0'