Help for this page

Select Code to Download


  1. or download this
      1 #!/usr/bin/perl -w
  2 
...
 14 
 15 $from->select("INBOX.Mymails");
 16 $from->migrate($to, 31, "INBOX.Mymails");
  2. or download this
    Use of uninitialized value in string eq at /usr/lib/perl5/vendor_perl/
+5.8.8/Mail/IMAPClient.pm line 773, <STDIN> line 2.
Use of uninitialized value in pattern match (m//) at /usr/lib/perl5/ve
+ndor_perl/5.8.8/Mail/IMAPClient.pm line 773, <STDIN> line 2.