open IN, "<$ARGV[0]"
    or die "Could not open input file '$ARGV[0]' $!";