package fetcher;

sub gather {
   my %tmp;
   $tmp{'name'} = "ironcom";
   $tmp{'pwd'}  = "pwd";

   return \%tmp;
}
1;