my $listSeparator = $";(@array) = (1..5, "A", "B", "C");$" = ',' ;print STDOUT "The list separator is a comma.\n";print STDOUT "@array\n\n";