modified using WWW::Mechanize
modified for disknets neo