open (my $LISTDEL, '<', $ARGV[0]) || die $!; 

##</code><code>##

if (@ARGV = 2){