Select Code to Download

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

LINE: while (defined($_ = <ARGV>)) {
    chomp $_;
...
    ;
}
-e syntax OK

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