Sha256: 751a1ef7fbd5175e3b591fdb334b133c00649767657c69b82a2f9369ab947b26
Contents?: true
Size: 435 Bytes
Versions: 73
Compression:
Stored size: 435 Bytes
Contents
package Matrix;
use strict;
use warnings;
sub new {
my ($class, $matrix) = @_;
my $self = bless {} => $class;
foreach my $row (split '\n' => $matrix) {
push @{$self->{rows}}, [ split '\s' => $row ];
}
return $self;
}
sub rows { $_[0]->{rows}->[$_[1]] }
sub columns {
my ($self, $index) = @_;
my @column;
push @column => $_->[$index] for @{$self->{rows}};
return \@column;
}
1;
Version data entries
73 entries across 73 versions & 1 rubygems