my $theHash; if ($inline =~ //) { if ($inline =~ /value=\"(.*?)\" targetPo=\"(.*?)\"/) { push @{$theHash->{$1}},$2; } } $self->{valuePair} = $theHash;