Select Code to Download

    print $var, "\n";
    # but...
    print "$var\n" for @list;
    # or...
    print($var, "\n") for @list;