Help for this page

Select Code to Download

Select or download this

c:\test>perl -e "for $f ( @a = qw/0 1 2.3 fred . ''/) { print $f =~ $f
+, '-', $f = ~$f, $/; }"
1-â•§
...
1-Ã–Ã¬ÃœÂ¢
1-â•¤
1-â•ªâ•ª

Select or download this

$string = "dsadfkjasdkhakhds dhf sahd fsd "
          "sdshsa ashjashjas  asjhasjhasdh";

$str = 'Fred is ' $num " years old\n";