perl -MO=Deparse -ne 'chomp;$s+=$_ if($_>10240);END{print "$s\n"}'

##</code><code>##

LINE: while (defined($_ = <ARGV>)) {
    chomp $_;
    $s += $_ if $_ > 10240;
    sub END {
        print "$s\n";
    }
    ;
}
-e syntax OK

##</code><code>##

while (<>) {
    chomp;
    $s += $_ if $_ > 10240;
}
print "$s\n";