Beefy Boxes and Bandwidth Generously Provided by pair Networks
good chemistry is complicated,
and a little bit messy -LW

Re^8: How to combine these 2 subroutines in one?

by Athanasius (Chancellor)
on Apr 04, 2014 at 09:36 UTC ( #1081093=note: print w/replies, xml ) Need Help??

in reply to Re^7: How to combine these 2 subroutines in one?
in thread How to combine these 2 subroutines in one?


That is, provided that the passed-in-array does not itself contain references. For the purpose of this exercise, you may know that it won’t, but in the general case, it might, which is why a solution using wantarray may be preferable here, as explained above.

Note that “empty” here means the empty string, i.e. "", so to make the test more robust you could write:

my $type_of_arg = ref $_[0]; if ($type_of_arg eq "ARRAY") { # Handle an array reference } elsif ($type_of_arg eq "") { # Handle an array } else { die "Unexpected reference type '$type_of_arg': $!"; }

Hope that helps,

Athanasius <°(((><contra mundum Iustus alius egestas vitae, eros Piratica,

Replies are listed 'Best First'.
Re^9: How to combine these 2 subroutines in one?
by Anonymous Monk on Apr 04, 2014 at 09:41 UTC
    Thank you so much for these tips, references have always been a headache to me... Actually, I don't quite understand what do we use them for, I need to study up on this more!

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1081093]
[harishnv]: i have one doubt

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (6)
As of 2018-02-18 11:28 GMT
Find Nodes?
    Voting Booth?
    When it is dark outside I am happiest to see ...

    Results (253 votes). Check out past polls.