The Perl code that has been submitted doesn't look great. Here is the Perl code for Sum a Column of Integers:

    #!/usr/local/bin/perl

    use integer;
    shift;
    while (<>) { $tot += $_ }
    print "$tot\n";
[download]

Since the number of lines is a judging criterion these 4 lines could have been written as follows:

    #!/usr/bin/perl -pl

    $tot += $_ }{ $_ =+ $tot
[download]

Also, using integer is unnecessary and is bound to slow the code down.

However, as arhuman points out, it looks like the contest is on hold for now.

--
John.