Works like a charm
Thanks
At 09:57 PM 4/28/01 -0500, you wrote:
>-----BEGIN PGP SIGNED MESSAGE-----
>Hash: SHA1
>
>On Sun, 29 Apr 2001, Dave Watkins wrote:
>
> > Hi All
> >
> > I am trying to pass a variable, a hash table and an array into a subroutine
> > like so
> >
> > subroutine($variable, %hash, @array);
> >
> > and pick it up like so
> >
> > sub subroutine {
> > my($variable, %hash, @array) = @_;
> >
> > but it seems the array isn't being passed, I can print the contents of the
> > array before the sub is called but if I try to print it from within the sub
> > I get nothing. The other 2 are being passed fine. If it makes any
> > difference the sub is in another file, but "require" is being used.
> >
> > Thanks
>
>It is being passed, it's just mashed into the hash because Perl doesn't
>know where the hash stops and the array begins.
>
>You have to use references with hashes and arrays, especially if you have
>more than one of either, or a scalar after them...
>
>Try subroutine($variable, \%hash, \@array);
>
>and pick it up as
>sub subroutine {
> my($variable, $hashref, $arrayref) = @_;
> my %hash = %$hashref;
> my @array = @$arrayref;
>
>That should work.
>
>- --
>Curtis Jewell http://curtis.livejournal.com/
>[EMAIL PROTECTED] http://web.missouri.edu/~csjc05/
>[EMAIL PROTECTED] http://new-york.utica.mission.net/
>Public Key: http://web.missouri.edu/~csjc05/curtis.key.txt
>
>-----BEGIN PGP SIGNATURE-----
>Version: GnuPG v1.0.4 (GNU/Linux)
>Comment: For info see http://www.gnupg.org
>
>iD8DBQE664MpNGcErwayIw4RAoaZAJ4q21IgbO4xLGW2PInF/52QYG0gQwCgl6jC
>NX4KGnraZoZRJK/UeMNG/HA=
>=teo/
>-----END PGP SIGNATURE-----
