perl -pie '
BEGIN {
  open $fh, "<" , "littlefile" or die "Cannot read file";
  our %hash = map { $_ => 1} <$fh>;
}
print if not $hash{$_};
' < bigfile