shift an array from the values passed to subroutine in Perl

Question

I am passing some undefined no. of arrays to the subroutine in perl I want to get these individual arrays in the subroutine and so I can run loop. But as i was unable so I tried passing the count of arrays. But as we can remove individual elements from an array using shift can we do same with array i.e. is there some function similar to Shift for array.

sub iFrame
{
    my $count=shift @_;

    for (my $i=1;$i<=$count;$i++)
        {
         my @iFrame =@_; #need to remove this @iFrame each time
         print qq[<iframe src="$iFrame[0]" width="$iFrame[1]" 
         height="$iFrame[2]" frameborder="$iFrame[3]" name="$iFrame[4]"></iframe>];
             # and some other code
        }

A better solution would be if I am able to do the same without passing the $count of arrays.

Joshua Henn · Accepted Answer · 2013-10-11 04:05:06Z

5

Best way is to pass a reference to the array, then dereference it in the subroutine. Like this:

use strict;
my @array = qw(a b c);
mysub(\@array);

sub mysub
{
  my @array = @{$_[0]};
  foreach (@array)
  {
    print $_
  }
}

answered Oct 11, 2013 at 4:05

Joshua Henn

701 bronze badge

Sign up to request clarification or add additional context in comments.

Comments

ikegami · Accepted Answer · 2013-10-11 04:58:38Z

3

Pass them as references.

sub iFrame
{

    for my $iFrame (@_)
        {
         print qq[<iframe src="$iFrame->[0]" width="$iFrame->[1]" 
         height="$iFrame->[2]" frameborder="$iFrame->[3]" name="$iFrame->[4]"></iframe>];
             # and some other code
        }
}

iFrame(
   [ $src1, $width1, $height1, $frameborder1, $name1 ],
   [ $src2, $width2, $height2, $frameborder2, $name2 ],
);

answered Oct 11, 2013 at 4:58

ikegami

391k17 gold badges291 silver badges555 bronze badges

Collectives™ on Stack Overflow

shift an array from the values passed to subroutine in Perl

2 Answers 2

Comments

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

2 Answers 2

Comments

Comments

Your Answer

Sign up or log in

Post as a guest

Related