in reply to Please help me in mechanize module

Reading the documentation, I guess you should $mech->tick('samba',$_) for qw/45 172 39/ before submitting the form.

In Section Seekers of Perl Wisdom