#!/usr/bin/perl -w use strict; my %hash; $hash{'my_mother=Nice,my_brother=Great;3;45;987;'}='True'; foreach my $key (keys %hash) { print "$key VALUE =$hash{$key}\n"; } __END__ prints: my_mother=Nice,my_brother=Great;3;45;987; VALUE =True