$_ = "package daa; package MyClass::two; package Myclass::SubClass::three;";
 /^(\w+) (\w+)\;/;
 print $2;