if ($file =~ /Rajesh.(\d+).*/) {
	print $1;
            }