Select Code to Download

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

enter two values
10
20
two values are 10,20