@files = map { -f $_ ? $_ : () } @ARGV;

##</code><code>##

@files = grep { -f $_ } @ARGV;

##</code><code>##

    while ( <> ) {
        chomp;
        push @files, $_;
    }

##</code><code>##

    chomp( @files = <> );

##</code><code>##

    chomp( @files = @ARGV ? grep { -f $_ } @ARGV : <> );