c:\@Work\Perl\monks>perl -wMstrict -le
"my ($x, $y, $z) = qw(Fie Foe Fum);
 my @ra = qw(foo bar baz);
 ;;
 my $s = $x . $y . $y . @ra;
 print $s;
"
FieFoeFoe3