$ARGV   contains the name of the current file when reading from <>.