B::Deparse can translate a one-liner into a (almost) regular program. To use it, add -MO=Deparse to the beginning of perl's command line.

Using the Perl section of graff's example:

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

This gives us:

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

which we can tighten up to be:

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