hostname
banner exec

search file
hostname XXXXX
banner exec ******************************************************************************
banner exec
banner exec This device belongs to the

##</code><code>##

use strict;
use warnings;

my %file2;
open my $file2, '<', shift or die;
while ( my $line = <$file2> ) {
    ++$file2{$line};
}

open my $file1, '<', shift or die;
while ( my $line = <$file1> )
 {
    print $line unless $file2{$line};
}