Help for this page

Select Code to Download


  1. or download this
    use strict;
    use warnings;
    ...
    $mergedHash{$_}++ for keys %file2Hash;
    
    print "$_\n" for grep $mergedHash{$_} == 1, keys %mergedHash;
    
  2. or download this
    do { chomp; $file1Hash{$_}++ } for read_file $files[0];
           ^           ^            ^      ^
    ...
            |                              |
            |                              + - If it only appears once (in
    + either file, but not both)
            + - Print the line