R. Joseph Newton wrote:

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>




Reply via email to