in reply to Read two values from input

Or alternatively you could use arguments for this:

my ($one, $two) = @_;

In Section Seekers of Perl Wisdom