code bug
Mitglied
Thread Starter
- Dabei seit
- 27.04.2011
- Beiträge
- 78
- Reaktionspunkte
- 1
Moin.
Ich habe mich auf Wikipedia ein bisschen über JAPH´s und Obfuscating-Contests informiert. Da ich gerade zum zweiten mal Perl lerne, habe ich mal ein kleinen Code geschrieben. Da ich noch relativer Anfänger bin gebt mir bitte Tipps bezüglich des Codes und ob man etwas verbessern könnte
cb
Ich habe mich auf Wikipedia ein bisschen über JAPH´s und Obfuscating-Contests informiert. Da ich gerade zum zweiten mal Perl lerne, habe ich mal ein kleinen Code geschrieben. Da ich noch relativer Anfänger bin gebt mir bitte Tipps bezüglich des Codes und ob man etwas verbessern könnte
Code:
#!/usr/bin/perl#lookinheavyforwardisgood!
sub gimme{$s[0]="r";$s[1+1-1]="e";$s[2]="k";$s[3]="c";$s[2*2-0]="a";$s[5]="H";$s[2*2+2] =" ";$s[7]=
"l";$s[8]="r";$s[9]= "e"; $xv446762374_78643rghjhgg__XX ="6543763\\\\\\&\%\$\§-X532";$s[10] ="P" ;$s[11] = " ";$s[12] =
"r";$s[13] = "e";$s[(((14/2)-4)*5)-1] = "h";$s[15] = "t";$s[16] = "o";$s[17] = "n";$s[18] ="a";#BOAHjust6636WAiT
if($xv446762374_78643rghjhgg__XX!="X-X"){$s[19] =" ";$s[((10+10)/2)*2] = "t";
$s[21] ="s";$xxba7V_6645="bbb55xv!/hj";$s[22] = "u";$s[23] = "J";
$gimmeeverything=reverse@s;print"$gimmeeverything\n";}}&gimme###
cb
Zuletzt bearbeitet: