All pastes #415441 Raw Edit

Anonymous

public text v1 · immutable
#415441 ·published 2007-03-29 17:00 UTC
rendered paste body
#!/usr/bin/perl -w


my $prog = <STDIN>;


chop (my $x =  system("($prog) perl - e 'printf "x" x 2000') );