RosettaCodeData/Task/A+B/Perl/a+b-1.pl
2023-07-01 13:44:08 -04:00

2 lines
77 B
Perl

my ($a,$b) = split(' ', scalar(<STDIN>));
print "$a $b " . ($a + $b) . "\n";