Jonathan "Duke" Leto
13 years ago
2 changed files with 16 additions and 2 deletions
@ -0,0 +1,14 @@ |
|||
#!/usr/bin/env perl |
|||
|
|||
# Why do I have to write this? |
|||
|
|||
use strict; |
|||
use warnings; |
|||
my $sum; |
|||
|
|||
while (<>) { |
|||
chomp; |
|||
$sum += $_; |
|||
} |
|||
|
|||
print "$sum\n"; |
Loading…
Reference in new issue