my $input = $ARGV[0]; $input =~ s/\\n/\n/g;