Help for this page

Select Code to Download

Select or download this

my ($one, $two) = qw( one two );
print "$one\r$two\n";