tee.pl

来自「QUALCOMM JNAND DRIVER」· PL 代码 · 共 11 行

#===================================================================
# FILE: tee.pl
#===================================================================
$filename=$ARGV[0];

open(OUT,">$filename");
while(<STDIN>){
        print;
        print OUT;
}