my @old_values = list($pdl_oldvalues); my @new_values = map $hash_lookup->{$_}, @old_values; my $pdl_newvalues = pdl(\@new_values);