A+B: Difference between revisions
Content added Content deleted
Line 2,682: | Line 2,682: | ||
=={{header|Perl}}== |
=={{header|Perl}}== |
||
<lang Perl>my ($a,$b) = split(' ', scalar(<STDIN>)); |
<lang Perl>my ($a,$b) = split(' ', scalar(<STDIN>)); |
||
print "$a $b " . ($a + $b) . "\n"; |
print "$a $b " . ($a + $b) . "\n";</lang> |
||
=== using the List::Util module === |
=== using the List::Util module === |
||
say sum split /\s+/, scalar <STDIN>;</lang> |
<lang Perl>say sum split /\s+/, scalar <STDIN>;</lang> |
||
=={{header|Perl 6}}== |
=={{header|Perl 6}}== |