Greetings! E:\d_drive\perlStuff>perl -w while (<DATA>) { print; }
__JABBERWOCK__ Hello
YOU can YOU can :) Just write an Inline for it:
use Inline JABBERWOCK;
goto_AlphaCenturi();
__END__
__JABBERWOCK__
void goto_AlphaCentur() {
printf("I've been banished *to* Jabberwock, but at \ least I have Perl %s\n",
SvPVX(eval_pv("use Config; $Config{version}",
0)));
}
(Obviously since Inline JABBERWOCK doesnt YET exist, this geberates some errors - sort of ... you will need to have Inline installed to see.)
-Bill- __Sx__________________________________________ http://youve-reached-the.endoftheinternet.org/
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>