Khrono

How long does it take to make an obfu? ;)
Enjoy my timer guys.
WARNING worx only on unix shells like Bash, Sh or Csh.

#!/usr/bin/perl

####################################
# Khrono: another obfu by X-3mE'89 #
####################################
# built with mask.pl v0.1_alpha    #
# for perlmonks.org                #
####################################

$_=q%

my$minutes=0;my$seconds=0;my$cseconds=
0;while(true){select(undef,undef,undef
,0                                  .0
1)   ;$cs   econ        ds++    ;   if
($  c    s e    c           o   n   ds
>=  1    0 0    )  {$       c   s   ec
on                      ds=0        ;$
se  c    o n    d  s+  +        }   if
($  s    e c    o      n        d   s>
=6   0){$   seco        nds=    0   ;$
mi                                  nu
tes++}print"\ecAnother^Obfu^by^X-3mE'8
9\x0a$minutes:$seconds:$cseconds\x0a"}

%;

s/\s//g;
s/\^/ /g;
eval
[download]

X-3mE'89
"Considerate la vostra semenza:
Fatti non foste a viver come bruti,
Ma per seguir virtute e canoscenza"
Divina Commedia, Inverno, Canto XXVI

Comment on Khrono Download Code

Replies are listed 'Best First'.
Re: Khrono by diotalevi (Canon) on Aug 03, 2004 at 20:19 UTC
As a general point of style, `s/\s+//g` is preferrable to `s/\s//g` because the output is the same but you allow \s+ to quickly advance the pointer while \s under /g has to use the pattern-scoped pointer advancement.	[reply] [d/l] [select]
Re^2: Khrono by X-3mE (Acolyte) on Aug 04, 2004 at 13:50 UTC
But this was generated with mask.pl_v0.1_alpha (written by me :)), it's not a "hand-made" obfu. Anyway, I'll correct this. X-3mE'89 "Considerate la vostra semenza: Fatti non foste a viver come bruti, Ma per seguir virtute e canoscenza" Divina Commedia, Inverno, Canto XXVI	[reply]
Re: Khrono by Moriarty (Abbot) on Aug 04, 2004 at 12:35 UTC
Not bad, although I think the numbers should have been zero-filled to 2 digits. It weas a little disconcerting to see them flick between single and double digits.	[reply]
Re^2: Khrono by X-3mE (Acolyte) on Aug 04, 2004 at 13:46 UTC
I've thought about it, maybe i'll fix it sometime... ;) X-3mE'89 "Considerate la vostra semenza: Fatti non foste a viver come bruti, Ma per seguir virtute e canoscenza" Divina Commedia, Inverno, Canto XXVI	[reply]


No such thing as a small change
	PerlMonks