$x =~ s/['\s+]//g;
my %hash = split /[:,]/, $x;