to samozrejme dela neco jineho, opravuji se while (defined($_ = <ARGV>)) { (); } On Fri, 20 Sep 2002 15:15:44 +0200, Miroslav Semora wrote: > perl -ne '' > > On Thu, 12 Sep 2002 10:34:16 +0200, Jiri Polcar wrote: >> Zdravim, >> >> lze napsat neco kratsiho nez >> >> $perl -e 'while (1) {}' >> >> se stejnym ucinkem? >>