Skip to content

Embed URL

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
use warnings;
use strict;
multiplyArray( [1,2,3], [4,5,6]);
sub multiplyArray{
#my $a = shift;
#my $b = shift;
my ($a, $b) = @_;
my @p;
foreach my $a_i (@$a){
my @row;
foreach my $b_j (@$b){
push @row, $a_i * $b_j;
}
push @p, \@row;
}
print "Reference to array product: ", \@p, "\n";
print "Dereferenced array product: \n";
print "@$_\n" foreach @p;
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Something went wrong with that request. Please try again.