Select Code to Download

Use of uninitialized value in concatenation (.) or string at ./compare
+.pl line 25.

#!/usr/bin/perl -w

...

close(OUT);
exit;