in reply to Help with scalar values and array as arguments to function
This is one of many ways to do it:
-imransub format_output { my $var1 = shift; my $var2 = shift; my @arrayref = @_; do_some_stuff; } my $scalar = 'abcdefghijklmnopq'; my @array = (); my @tmparray = split('',$scalar); @array = splice(@tmparray, 8, 6); &format_address(":", 0, @array);
|
---|
In Section
Seekers of Perl Wisdom