On 7/2/06, jdow <[EMAIL PROTECTED]> wrote:
From: "Andrew Pantyukhin" <[EMAIL PROTECTED]>
> On 7/2/06, Isaac Friedman <[EMAIL PROTECTED]> wrote:
>> I am new to UNIX but know the basics of getting
>> around, writing simple shell scripts, etc. Is there
>> any way to use a short perl program as a shell script?
>
> sat64% cat << __END__ > ./script.pl
> #!/usr/local/bin/perl -w
> print "Hello world!\n";
> __END__
> sat64% chmod a+x ./script.pl
> sat64% ./script.pl
Gee, Andrew, you didn't need to obfuscate it that way.
I can read his code just fine... Here's obfuscated perl:
`$=`;$_=\%!;($_)=/(.)/;$==++$|;($.,$/,$,,$\,$",$;,$^,$#,$~,$*,$:,@%)=(
$!=~/(.)(.).(.)(.)(.)(.)..(.)(.)(.)..(.)......(.)/,$"),$=++;$.++;$.++;
$_++;$_++;($_,$\,$,)=($~.$"."$;$/$%[$?]$_$\$,$:$%[$?]",$"&$~,$#,);$,++
;$,++;$^|=$";`$_$\$,$/$:$;$~$*$%[$?]$.$~$*${#}$%[$?]$;$\$"$^$~$*.>&$=`
--
BSD Podcasts @:
http://bsdtalk.blogspot.com/
http://freebsdforall.blogspot.com/
_______________________________________________
freebsd-questions@freebsd.org mailing list
http://lists.freebsd.org/mailman/listinfo/freebsd-questions
To unsubscribe, send any mail to "[EMAIL PROTECTED]"
