Front page | perl.fwp |
Postings from December 2001
Philippe 'BooK' Bruhat wrote:
>
> On Fri, 7 Dec 2001, BooK wrote:
>
> > En réponse à "Keith C. Ivey" <kcivey@cpcug.org>:
> >
> > > I'm surprised no one submitted anything with 0 x10, but I
> > > guess those always end up too long.
> >
>
> -n END{print$a,$/}BEGIN{$a='00'x5}++$a # 38
> -n BEGIN{$a=$-x10}$a++;END{print$a,$/} # 38
> -n INIT{$a=$-x10}$a++;END{print$a,$/} # 37
Since I'm going through "Golf withdrawal":
-p $a||=$|x10;++$a}{$\=$a.$/ # 28
--
Rick Klement
Thread Previous
|
Thread Next