use strict;
use warnings;

for ( @ARGV )
{
    s/\\n/\n/g;
}

my $string1=$ARGV[0];
my $string2=$ARGV[1];
print $string1 ;
print $string2 ;