in reply to Its not working.. String works but not split
use Devel::Peek; Dump($string1); Dump($string2); [download]