postproc.pl

来自「MIPS下的boottloader yamon 的源代码」· PL 代码 · 共 21 行

#!/usr/bin/perl

<STDIN>;		# toss first line...
$last = <STDIN>;	

while( <STDIN> )
{
    if( $_ =~ /\!/ )
    {
        <STDIN>;  # skip next line
        $last = <STDIN>; # get following line
    }
    else
    {
        print $last;
        $last = $_;
    }
}
print $last;