chomp (my $n1=<>); # STDIN is the default

##</code><code>##

print "$n1,$n2;\n";