From: Nikola Janceski <[EMAIL PROTECTED]>
> Is there a way to get the command line arguments before they are
> expanded by the shell?
>
> script.pl file* names*
>
> I want to get the file* and not the expanded list of file1 file2 file3
> file4 etc.
>
> I know I can put it in quotes but is there any other way around it?
Well ... under Windows, if you use cmd.exe, you can access the
original commandline (well almost, without the redirections) with
use Win32::API;
{
my $GetCommandLine
= Win32::API->new('kernel32', 'GetCommandLine', [ ] , 'P' );
$cmdline = $GetCommandLine->Call();
}
But there you have an inverse problem ... you normaly get the
parameters split, but not globed. So you have to do it yourself (or
use a module)
If you'd happen to use G.pm for that you could access the
command line as $G::cmdline, since G parses this instead of
using @AGRV.
But I guess you use Unix or at least a unixee shell so then you are
out of luck.
Jenda
=========== [EMAIL PROTECTED] == http://Jenda.Krynicky.cz ==========
There is a reason for living. There must be. I've seen it somewhere.
It's just that in the mess on my table ... and in my brain.
I can't find it.
--- me
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
