Q:\>perl -le "print for @ARGV" *
*