use integer; #Perl 5
my int ($t); #Perl 6
$t = time - $when_it_happen;
$sec=$t%60; $t=int($t/60);
$min=$t%60; $t=int($t/60);
$hours=$t%24; $t=int($t/24);
$days=$t;
return time_elapsed($days,$hours,$min,$sec)
--
Brent "Dax" Royal-Gordon <[EMAIL PROTECTED]>
Perl and Parrot hacker
Oceani
On Sun, 20 Jun 2004 15:57:48 +0100, Jonathan Worthington
<[EMAIL PROTECTED]> wrote:
"Alexey Trofimenko" <[EMAIL PROTECTED]> wrote:
what do you think about adding C operator, akin %, to perl6 core?
I mean, as$a % $b
really does int($a) % int($b)
and returns modul
"Alexey Trofimenko" <[EMAIL PROTECTED]> wrote:
>
> what do you think about adding C operator, akin %, to perl6 core?
>
> I mean, as$a % $b
> really does int($a) % int($b)
> and returns modulous,
>
> so $a div $b
> really does int( in
what do you think about adding C operator, akin %, to perl6 core?
I mean, as$a % $b
really does int($a) % int($b)
and returns modulous,
so $a div $b
really does int( int($a) / int($b) )
and returns integer division.
but with native int
