On Thu, Sep 08, 2005 at 02:41:27AM +0400, Alexey Tourbin wrote: > On Wed, Sep 07, 2005 at 01:26:23PM +0400, Sergey Vlasov wrote: > > $SIG{'PIPE'} = 'IGNORE' ? > > > > Или вообще perl -MList::Util=shuffle -e "print((shuffle(<>))[0..$n])" и > > убрать head. > > Эх. Это же ортогональная функциональность. > А что-нибудь вроде -- будет работать? > > shuffle | (head -10; cat >/dev/null) | sort ... Будет. -- ldv