ssbb · July 11, 2015 16:28
diff --git a/hey.pl b/hey.pl
 my $thisName = "myname";
 my $thisPass = "mypassword";
 my @series = ();

 my %thisData = (login => $thisName, pass => $thisPass);
 push(@series, \%thisData);

 foreach my $index (0 .. $#series) {
    print $series[$index]{'pass'};
 }
	my $thisName = "myname";
	my $thisPass = "mypassword";
	my @series = ();

	my %thisData = (login => $thisName, pass => $thisPass);
	push(@series, \%thisData);

	foreach my $index (0 .. $#series) {
	print $series[$index]{'pass'};
	}