13:35 >perl -MO=Deparse 1848_SoPW.pl
use File::Glob ();
@ARGV = glob('/cygdrive/c/Users/abc123/Documents/dude/logs/*.log');
while (defined($_ = readline ARGV)) {
    ();
}
1848_SoPW.pl syntax OK

13:35 >