A+B: Difference between revisions

<lang Perl>my ($a,$b) = split(' ', scalar(<STDIN>));

print "$a $b " . ($a + $b) . "\n";</lang>

# Or using The List::Util module and a modern perl...

say sum split /\s+/, scalar <STDIN>;