perl -MData::Dumper -e "%Rhash = ('email'=>'email\@email',timestamp=>scalar localtime()); $dummyArray[0] = \%Rhash; $Phash{'woowo'} = \@dummyArray; print Dumper %Phash;" $VAR1 = 'woowo'; $VAR2 = [ { 'email' => 'email\\@email', 'timestamp' => 'Mon Aug 29 14:50:52 2005' } ]; C:\>