BEGIN{ @ARGV = map glob, @ARGV }
while( <> ) {
   ...
}