#!/usr/bin/perl

use Data::Dumper;

$text = "deepak.gulati";
$hash1 = `echo -n $text`

print Dumper( $hash1 );