#! usr/bin/perl -w
use strict;
print "enter two values\n";
my $x=<STDIN>;
chomp($x);
my $y=<STDIN>;
chomp($y);
print "two values are $x,$y\n";

##</code><code>##

enter two values
10
20
two values are 10,20