Anonymous user
A+B: Difference between revisions
m
→{{header|Perl}}
Line 2,682:
=={{header|Perl}}==
<lang Perl>my ($a,$b) = split(' ', scalar(<STDIN>));
print "$a $b " . ($a + $b) . "\n";
# Or using The List::Util module and a modern perl...
say sum split /\s+/, scalar <STDIN>;</lang>
=={{header|Perl 6}}==
| |||