Note: You probably don't need the glob if your on *nix.

Yes, this is true. Instead of my @files = glob $ARGV[0];, it would be my @files = @ARGV; (or one could simply use @ARGV directly). The reason for this is most unix shells expand globs before perl even gets the command line.