Re: potential Golf task - seconds -> years, days ...

[Ton Hospel]

In article <[EMAIL PROTECTED]>,
        [EMAIL PROTECTED] writes:
> En op 21 juli 2002 sprak Steffen:
>> #!perl -l
>> $b=$ARGV[0];@a=(1,60,60,24,365);while($a=pop@a){$a*=$_ for@a;print
>> int$b/$a;$b=$b%$a}
> 
> Some gratuitous obfuscation and only 8 strokes saved:
> 
> #!perl -l
> @)=(s))pop)e,$=,$=,24,365);map($=*=$_,@)),print($_/$=|$%),$_%=$=while$==pop@
> )
> 
mtve: -l print for(@a=gmtime pop)[5]-70,@a[7,2,1,0]