#!/usr/bin/perl -w
use strict;
use warnings;

our %hash;
BEGIN {
	for my $file (@ARGV) {
		open my $fh, "<", $file
			or die "can't open: $file";
		while (<$fh>) {
			chomp;
			$hash{$_} = undef;
		}
	}
}

while (<STDIN>) {
	chomp;
	print "$_\n" if !exists $hash{$_};
}