Better with warnings

Just a little idea i had while playing with the regex engine.

#!/usr/bin/perl
use strict;use warnings;
$SIG{__WARN__}=sub{($_)=@_;/^\w+\s\w+(\w)(?{print$1})(?<=[A-Z])/};open
+ Ozybied,$0;print Ozybied"Just Another Perl Hack";
[download]

Must be saved to a file in order to work properly.

Comment on Better with warnings Download Code

Replies are listed 'Best First'.
Re: Better with warnings by cristian (Hermit) on Apr 12, 2005 at 16:31 UTC
`The result is :deibyz you must do her duty of JAPH. .- Just Another Perl Hacker, Is wrong or It is ok???` [download]	[reply] [d/l]
Re^2: Better with warnings by ktross (Deacon) on Apr 12, 2005 at 18:26 UTC
cristian, It is not mandatory for the code posted in this section to be a JAPH. It often is, but some of the most interesting things here were completely different. Check out: Erudil's camel code and eyepopslikeamosquito's Saturn if you haven't already. All that's required is that the methodology of the script is not imeddiatly apparent to all. In short - simply obfuscated code.	[reply]
Re^3: Better with warnings by cristian (Hermit) on Apr 12, 2005 at 19:25 UTC
`Yes understand. I not criticize the code , only questions the finaly the obfuscade code not search to outwit with Japh. For what outwit japh and where is the concept? My end not is to offend , is learn. Thanks ktros and deibyz for learn.` [download]	[reply] [d/l]
Re^2: Better with warnings by deibyz (Hermit) on Apr 12, 2005 at 16:35 UTC
Was intended as a signature. The "Just Another Perl Hack" is just to distract attention.	[reply]
Re^3: Better with warnings by cristian (Hermit) on Apr 12, 2005 at 17:03 UTC
`Yes i undestend , but , ofuscated sections it based in japh? or signature? or simply ofuscated code.? The signature is good , where is the concept.` [download]	[reply] [d/l]