Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!uunet!mcsun!unido!tub!tubopal!ripley
From: ripley@opal.cs.tu-berlin.de (Hans-Ch. Eckert)
Newsgroups: comp.lang.perl
Subject: Re: ST-Perl/Ref-Guide
Message-ID: <RIPLEY.90Aug24001121@troll.cs.tu-berlin.de>
Date: 23 Aug 90 22:11:21 GMT
References: <1711@troll.tubopal.UUCP>
Sender: news@tubopal.UUCP
Organization: Technical University of Berlin, FRG
Lines: 38
In-reply-to: ripley@tubopal.UUCP's message of 17 Aug 90 02:26:27 GMT
To:

In article <1711@troll.tubopal.UUCP> ripley@tubopal.UUCP (Hans-Ch. Eckert) writes:

   BTW: Has anybody an idea how to make a gulam-wrapper for perl-scripts?
   The "#!" doesn't work and gulam is neither a Bourne-shell nor a real csh.

I got a mail from Edgar who suggested:

In Gulam:
	alias eval $1

Inside the Perl script:
	#!perl
	eval "perl -S $0 $*"
		if $running_under_some_shell;

This doesn't work for several reasons, but a little experimenting
revealed this:

In gulam:
	alias exec ' '

The Perl script (test.g):
--
exec perl $*
	if $running_under_some_shell;

print "This is test.pl,\nPerl $]\n";
--

Which works fine.

Greetings,
				RIPLEY
--
Greetings from RIPLEY | UUCP: ripley@tubopal.UUCP (ripley@opal.cs.tu-berlin.de)
Hans-Christian Eckert |         ...!unido!tub!opal!ripley (Europe) 
D-1000 Berlin 30      |         ...!pyramid!tub!opal!ripley (World)
Regensburger Str. 2   | BITNET: ripley%tubopal@DB0TUI11.BITNET (saves $$$)