open FILE, '<', $ARGV[0] or die "$ARGV[0]: $!\n";