http://qs1969.pair.com?node_id=379792

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

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

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.

      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

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.

      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