DATA:-

Username:  Password:


##</code><code>##

Search Pattern:-
for ($i = 0; $i <@array; $i++)
	{
	if($array[$i] =~ /Username\s*:\s*(.+)/)
		{
			$result = $1;