The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Devel::PL_origargv - access to the Perl interpreter's argv

SYNOPSIS

        my @PL_origargv = Devel::PL_origargv->get;

DESCRIPTION

If Perl is run with the following command:

        perl -w -Ilib yourscript.pl arg1 arg2

Then @ARGV will be pre-populated with arg1 and arg2, and $0 will reflect the name of your script, but there's no way to access -w or -Ilib.

This module provides one class method that returns Perl's original argv array as a list.

get

Returns argv as a list of strings. If called in scalar context, returns argc (i.e. the count of argv).

CAVEATS

This module's test suite will not pass when run via forkprove. Use the standard prove instead.

BUGS

Please report any bugs to http://rt.cpan.org/Dist/Display.html?Queue=Devel-PL_origargv.

SEE ALSO

https://metacpan.org/source/RGARCIA/perl-5.6.2/perl.c#L856

AUTHOR

Toby Inkster <tobyink@cpan.org>.

COPYRIGHT AND LICENCE

This software is copyright (c) 2012-2014 by Toby Inkster.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.

DISCLAIMER OF WARRANTIES

THIS PACKAGE IS PROVIDED "AS IS" AND WITHOUT ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.