$part = substr($string, $initial, $length);
./substr.pl groad groad.net groad.net
.net
groad.net
www.wentowns.com
./substr.pl www.wentowns.com groad.net