From e76c9d209774c6fcb6582b76517b2af6eb9dc532 Mon Sep 17 00:00:00 2001 From: Nick Bebout Date: Mon, 16 Apr 2012 17:28:48 -0500 Subject: [PATCH] 1.476 --- CREDITS | 24 +- ChangeLog | 43 +- FAQ | 77 +- INSTALL | 18 +- README | 32 +- TIME | 3 + TODO | 48 +- VERSION | 2 +- VERSION_EXE | 2 +- W/paypal_reply/paypal_bilan | 4 +- W/paypal_reply/paypal_build_invoices | 17 +- W/paypal_reply/paypal_build_reply | 13 +- W/paypal_reply/paypal_functions | 4 +- W/paypal_reply/paypal_send | 18 +- imapsync | 103 ++- index.shtml | 131 +-- learn/zzz | 1226 -------------------------- tests.sh | 58 +- 18 files changed, 448 insertions(+), 1375 deletions(-) delete mode 100644 learn/zzz diff --git a/CREDITS b/CREDITS index 02a8b42..5fb735e 100644 --- a/CREDITS +++ b/CREDITS @@ -1,5 +1,5 @@ #!/bin/cat -# $Id: CREDITS,v 1.162 2011/09/21 20:21:14 gilles Exp gilles $ +# $Id: CREDITS,v 1.165 2011/12/10 02:25:01 gilles Exp gilles $ If you want to make a donation to the author, Gilles LAMIRAL, use any of the following ways: @@ -30,6 +30,23 @@ I thank very much all of these people. I thank also very much all people who bought imapsync from the homepage but I don't cite them here. +Thomas Edgar +Gave a FAQ item "from Exchange 2003 to Cyrus Imap 2.4" + +Dan Hulme. +Found a bug in the FAQ about --regextrans2 +(Fix is --regextrans2 's,${h2_prefix}(.*),${h2_prefix}FOO${h2_sep}$1,') +Suggested default --useheader 'Message-ID' --useheader 'Received' +(Exchange compliant) + +Ameir Abdeldayem +Gave a patch to sync messages lacking Message-ID +http://www.linux-france.org/prj/imapsync_list/msg01151.html + +Yousaf Shah +Contributed by giving the book +19.90 "Making Things Talk: Using Sensors, Networks, and Arduino to see, hear, and feel your world" + Klaus Franken Patch to avoid useless warning "Use of uninitialized value $uid1 in exists" @@ -1020,6 +1037,9 @@ Eric Yung Total amount of book prices : c \ +19.90+\ +13.59+\ +32.65+\ 20.31+\ \ 75.00+\ @@ -1150,4 +1170,4 @@ c \ 31.20+\ 40.00 = -2963.96 +3050.41 diff --git a/ChangeLog b/ChangeLog index 660c374..c22609c 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,17 +1,52 @@ RCS file: RCS/imapsync,v Working file: imapsync -head: 1.468 +head: 1.476 branch: locks: strict - gilles: 1.468 + gilles: 1.476 access list: symbolic names: keyword substitution: kv -total revisions: 468; selected revisions: 468 +total revisions: 476; selected revisions: 476 description: ---------------------------- -revision 1.468 locked by: gilles; +revision 1.476 locked by: gilles; +date: 2011/12/10 01:33:50; author: gilles; state: Exp; lines: +34 -8 +Applied Ameir Abdeldayem patch to deal with errors like +"Host1 Sent/15 size 1428 ignored (no header so we ignore this message)" +It happens with Sent folder when no Message-Id nor Received header +are defined in a message. +---------------------------- +revision 1.475 +date: 2011/12/08 08:23:16; author: gilles; state: Exp; lines: +7 -7 +Default header used to identify a message are now "Message-Id" and "Received". +---------------------------- +revision 1.474 +date: 2011/12/02 20:30:16; author: gilles; state: Exp; lines: +9 -9 +Default down from 1000 to --split1 500. (Cyrus "Word too long") +---------------------------- +revision 1.473 +date: 2011/12/01 14:06:23; author: gilles; state: Exp; lines: +8 -8 +Fixed output. fetch_hash_2 no longer exists. +---------------------------- +revision 1.472 +date: 2011/12/01 12:44:48; author: gilles; state: Exp; lines: +11 -6 +Added start and end dates in the final statistics. +---------------------------- +revision 1.471 +date: 2011/11/24 09:29:26; author: gilles; state: Exp; lines: +21 -20 +Checked and updated "Similar softwares" section in documentation. +---------------------------- +revision 1.470 +date: 2011/11/23 18:14:20; author: gilles; state: Exp; lines: +7 -7 +typo +---------------------------- +revision 1.469 +date: 2011/11/20 17:44:35; author: gilles; state: Exp; lines: +16 -9 +Added --nofilterflags to chech STORE flags ignoring PERMANENTFLAGS (Exchange tests) +---------------------------- +revision 1.468 date: 2011/11/18 01:23:37; author: gilles; state: Exp; lines: +33 -105 Replaced fetch_hash_2() calls by normal fetch_hash() ---------------------------- diff --git a/FAQ b/FAQ index 422d489..4265cc9 100644 --- a/FAQ +++ b/FAQ @@ -1,5 +1,5 @@ #!/bin/cat -# $Id: FAQ,v 1.97 2011/11/17 22:14:15 gilles Exp gilles $ +# $Id: FAQ,v 1.100 2011/12/10 01:38:36 gilles Exp gilles $ +------------------+ | FAQ for imapsync | @@ -139,6 +139,34 @@ Q. Is is legal? R. Yes, the license permits it http://imapsync.lamiral.info/COPYING +======================================================================= +Q. How can I speed up transfers? + +R. By using --useuid imapsync avoid getting messages headers and build + a cache. On Unix a good thing is to add also --tmpdir /var/tmp + to keep the cache since /tmp is often cleared on reboot. + + imapsync ... --useuid + +R. Add also --nofoldersizes since the default behavior is to compute + folder sizes. Folder sizes are useless for the transfer, just + useful to see what has to be done on each folder. + +======================================================================= +Q. I see warning messages like +"Host1 Sent/15 size 1428 ignored (no header so we ignore this message)" +What can I do to transfer those messages? + +R1. Use --addheader option, it will add a header like + "Message-Id: <15@imapsync>" and transfer the message on host2. + Duplicates won't happen in next runs. + + imapsync ... --addheader + +R2. Use --useuid then imapsync will avoid dealing with headers. + + imapsync ... --useuid + ======================================================================= Q. How can I try imapsync with the new Mail::IMAPClient 3.xx perl library? @@ -270,7 +298,7 @@ Consequences: The result is that you can have more messages on host1 than on host2. R2. With option --useuid imapsync doesn't use headers to identify -messages on both sides but it uses their imap uid. In than case +messages on both sides but it uses their imap uid. In that case duplicates on host1 are transfered on host2. ======================================================================= @@ -641,6 +669,41 @@ R2. Use --include '^MyFolder' and only them. +====================================================================== +Q. How to migrate from or to Exchange 2003 with an admin/authuser + account? + +R. Thomas Edgar wrote the following + +In case you can glean something from this snippet which allowed us +to migrate from Exchange 2003 t0 Cyrus Imap 2.4 (you would reverse +the flow to go the other way): + + imapsync --dry --host1 ExchangeServer.mycompany.com \ + --user1 Some.User@mycompany.com --authuser1 ExchangeAdminAccount \ + --proxyauth1 --password1 '$pass_with_dollars$' \ + --host2 cyrusimapbackend.mycompany.com \ + --user2 SameOrDiffererentUser@mycompany.com \ + --authuser2 CyrusAdminAccount --proxyauth2 + +We also needed to: + +- Ensure the Exchange Admin Acct had IMAP4 enabled in it's + profile (it initially didn't!) +- Ensure the Some.User Exchange Acct had IMAP4 enabled + in it's profile (it initially didn't!) +- Add the CyrusAdminAccount to admins line in /etc/imapd.conf +- Give CyrusAdminAccount lrswipkxtecda to the Cyrus Imap account + being migrated to (- or in your case, from) + +In case you are not aware: + +- It will prompt for a password if you don't supply it +- the domain part of the fully-qualified email could be + omitted in our case +- Use --debugimap when testing initial connectivity, if necessary + + ====================================================================== Q. How to migrate from or to Exchange 2007/2010 with an admin/authuser account? @@ -786,6 +849,9 @@ Q. Give examples about --regextrans2 R. --regextrans2 is used to transform folder names +Remember that --regextrans2 applies after the default +inversion prefix1 <-> prefix2 and sep1 <-> sep2 + Examples: 0) First try with --dry --justfolders options since imapsync shows the @@ -809,15 +875,14 @@ Examples: --regextrans2 's#(.*)#FOO/$1#' or: - - + c) Any separator, any prefix solution, FOO is the subfolder: It is a complicated line because every case is taken into account. Type it in one line (or with the \ at the end of first line on Unix shells. - --regextrans2 's,${h1_prefix}(.*),${h2_prefix}FOO${h2_sep}$1,' \ - --regextrans2 's,^INBOX$,${h2_prefix}NEW${h2_sep}INBOX,' + --regextrans2 's,${h2_prefix}(.*),${h2_prefix}FOO${h2_sep}$1,' \ + --regextrans2 's,^INBOX$,${h2_prefix}FOO{h2_sep}INBOX,' 3) to substitute all characters dot "." by underscores "_" diff --git a/INSTALL b/INSTALL index 9969b13..c4c5cd5 100644 --- a/INSTALL +++ b/INSTALL @@ -1,4 +1,4 @@ -# $Id: INSTALL,v 1.21 2011/11/17 08:07:03 gilles Exp gilles $ +# $Id: INSTALL,v 1.22 2011/12/10 02:27:04 gilles Exp gilles $ # # INSTALL file for imapsync # imapsync : IMAP sync or copy tool. @@ -110,11 +110,23 @@ Here is some individual module help: - Perl Authen::NTLM perl -mAuthen::NTLM -e '' -Everything in one command: +Test everything in one command: perl -mMail::IMAPClient -mDigest::MD5 -mTerm::ReadKey -mIO::Socket::SSL \ -mFile::Spec -mDigest::HMAC_MD5 -mAuthen::NTLM -e '' +You can install automatically those Perl modules via the +following commands (with root permissions) + + perl -MCPAN -e 'install Mail::IMAPClient' + perl -MCPAN -e 'install Digest::MD5' + perl -MCPAN -e 'install Term::ReadKey' + perl -MCPAN -e 'install IO::Socket::SSL' + perl -MCPAN -e 'install File::Spec' + perl -MCPAN -e 'install Digest::HMAC_MD5' + perl -MCPAN -e 'install Authen::NTLM' + + INSTALLING on Unix ------------------ @@ -122,7 +134,7 @@ To see what will be done, just run: make -n install -To install imapsync, just run: +To install imapsync, just run (as root): make install diff --git a/README b/README index ea85932..34e2e29 100644 --- a/README +++ b/README @@ -1,9 +1,9 @@ NAME imapsync - IMAP synchronisation, sync, copy or migration tool. Synchronise mailboxes between two imap servers. Good at IMAP migration. - More than 36 different IMAP server softwares supported with success. + More than 44 different IMAP server softwares supported with success. - $Revision: 1.468 $ + $Revision: 1.476 $ SYNOPSIS To synchronise imap account "foo" on "imap.truc.org" to imap account @@ -111,9 +111,7 @@ DESCRIPTION sides. Same headers and the transfer is done only once. All flags are preserved, unread will stay unread, read will stay read, deleted will stay deleted. You can stop the transfer at any time and restart it - later, imapsync works well with bad connections. imapsync is CPU hungry - so nice and renice commands can be a good help. imapsync can be memory - hungry too, especially with large messages. + later, imapsync works well with bad connections. You can decide to delete the messages from the source mailbox after a successful transfer (it is a good feature when migrating). In that case, @@ -125,6 +123,11 @@ DESCRIPTION You can also just synchronize a mailbox A from another mailbox B in case you just want to keep a "live" copy of B in A (--delete2 may help) + imapsync is not adequate for maintaining two active imap accounts in + synchronization where the user plays independently on both sides. Use + offlineimap (written by John Goerzen) or mbsync (written by Michael R. + Elkins) for 2 ways synchronizations. + OPTIONS To get a description of each option just invoke: @@ -423,25 +426,22 @@ Links SIMILAR SOFTWARES imap_tools : http://www.athensfbc.com/imap_tools - offlineimap : http://software.complete.org/offlineimap + offlineimap : https://github.com/nicolas33/offlineimap + mbsync : http://isync.sourceforge.net/ mailsync : http://mailsync.sourceforge.net/ - imapxfer : http://www.washington.edu/imap/ - part of the imap-utils from UW. - mailutil : replace imapxfer in - part of the imap-utils from UW. - http://www.gsp.com/cgi-bin/man.cgi?topic=mailutil + mailutil : http://www.washington.edu/imap/ + part of the UW IMAP tookit. imaprepl : http://www.bl0rg.net/software/ - http://freshmeat.net/projects/imap-repl/ - imap_migrate : http://freshmeat.net/projects/imapmigration/ + http://freecode.com/projects/imap-repl/ imapcopy : http://home.arcor.de/armin.diehl/imapcopy/imapcopy.html migrationtool : http://sourceforge.net/projects/migrationtool/ imapmigrate : http://sourceforge.net/projects/cyrus-utils/ wonko_imapsync: http://wonko.com/article/554 - see also tools/wonko_ruby_imapsync - isync : http://isync.sourceforge.net/ + see also file W/tools/wonko_ruby_imapsync + exchange-away : http://exchange-away.sourceforge.net/ pop2imap : http://www.linux-france.org/prj/pop2imap/ Feedback (good or bad) will often be welcome. - $Id: imapsync,v 1.468 2011/11/18 01:23:37 gilles Exp gilles $ + $Id: imapsync,v 1.476 2011/12/10 01:33:50 gilles Exp gilles $ diff --git a/TIME b/TIME index 2e06442..6ecb664 100644 --- a/TIME +++ b/TIME @@ -1,3 +1,6 @@ + +180 Release 1.476 --addheader + 15 Added start and end dates in the final statistics. 210 Added statistics on ks and lfo, % Operating systems, ip per year .Updated index.shtml 210 Added --nocacheaftercopy and played with dbmail (uids generation are +=2!) 120 Statistics statistics_VERSION_synthesis diff --git a/TODO b/TODO index b7e4207..b761f9f 100644 --- a/TODO +++ b/TODO @@ -1,16 +1,12 @@ #!/bin/cat -# $Id: TODO,v 1.104 2011/11/17 15:45:57 gilles Exp gilles $ +# $Id: TODO,v 1.108 2011/12/07 23:59:32 gilles Exp gilles $ TODO file for imapsync ---------------------- -Post on newsgroup comp.mail.imap when a new release comes. -http://groups.google.fr/group/comp.mail.imap - -Post on imapsync mailing-list when a new release comes. - Start a wiki for imapsync. +Write a tutorial. Add a best practice migration tips document. Write a Mail::imapsync package and use it. @@ -22,15 +18,34 @@ http://www.linux-france.org/prj/imapsync_list/msg00307.html Evaluate http://www.rackspace.com/apps/email_hosting/migrations http://www.yippiemove.com/ +http://www.migrationwiz.com/ +Consider /var/tmp/ instead of /tmp (/tmp is destoyed +on some Unix at reboot) + +Add a FAQ entry about long path over than 260 character on Win32. + +Fix long path over than 260 character on Win32. +Think about Digest::SHA or Digest::SHA::PurePerl. + +Try to use imapsync with cygwin. + +Change default --useheader 'Message-ID' --useheader Date to +--useheader 'Message-ID' --useheader 'Received' +because Exchange changes Date header! (but not Received:) + +Add an option to solve syncing Sent folder when no good header +are available: +http://www.linux-france.org/prj/imapsync_list/msg01151.html +http://www.linux-france.org/prj/imapsync_list/msg01158.html + + +Check message exists before fetching it (could have been deleted recently) Find a way to avoid passwords in --debugimap unless needed. Explain that users can win time/bandwidth by using --expunge -Fix long path over than 256 character on Win32. -Think about Digest::SHA or Digest::SHA::PurePerl. - Fix "\Forwarded" flag bug in courier. Does \lalala can be forbidden (courier does a "16 NO Error in IMAP command received by server" @@ -152,6 +167,21 @@ http://asg.web.cmu.edu/cyrus/download/imapd/altnamespace.html =========================================================================== +DONE. Add a script to install automaticaly all needed Perl modules +if needed. Not a script but command lines in INSTALL file. + +DONE. Post on imapsync mailing-list when a new release comes. +No since I no longer distribute it gratis, imapsync detects +itself a new release and buyers are informed by a specific +list. I know some packagers (FreeBSD) use the Changelog file +to detect an update. + +DONE. Subscribe users to imapsync_update mailing-list automatically after the payment. +(done in paypal_send) + +DONE. NO became porn! Post on newsgroup comp.mail.imap when a new release comes. +http://groups.google.fr/group/comp.mail.imap + DONE. The --search option allows this (and many other things) Add option --exclude_messages_with_flag diff --git a/VERSION b/VERSION index 11d932e..aaad981 100644 --- a/VERSION +++ b/VERSION @@ -1 +1 @@ -1.468 +1.476 diff --git a/VERSION_EXE b/VERSION_EXE index 11d932e..aaad981 100644 --- a/VERSION_EXE +++ b/VERSION_EXE @@ -1 +1 @@ -1.468 +1.476 diff --git a/W/paypal_reply/paypal_bilan b/W/paypal_reply/paypal_bilan index 3d914c8..19a8d44 100755 --- a/W/paypal_reply/paypal_bilan +++ b/W/paypal_reply/paypal_bilan @@ -1,6 +1,6 @@ #!/usr/bin/perl -# $Id: paypal_bilan,v 1.37 2011/09/17 22:54:31 gilles Exp gilles $ +# $Id: paypal_bilan,v 1.39 2011/11/30 07:59:11 gilles Exp gilles $ use strict; use warnings; @@ -453,7 +453,7 @@ sub compute_line { my $IND_flag = '' ; $IND_flag = ' IND' if ('imapsync usage' eq $Nom_Option_1 and 'individual' eq $Valeur_Option_1 ) ; print "FE $invoice$FR_flag$IND_flag\n" ; - print "Facture $invoice imapsync$FR_flag $Nom\n" ; + print "FE $invoice$FR_flag$IND_flag imapsync $Nom\n" ; printf( "%.2f [EUR %.2f]\n", $Montant, $MontantEUR ) ; } } diff --git a/W/paypal_reply/paypal_build_invoices b/W/paypal_reply/paypal_build_invoices index f999034..1db2d8c 100755 --- a/W/paypal_reply/paypal_build_invoices +++ b/W/paypal_reply/paypal_build_invoices @@ -1,6 +1,8 @@ #!/bin/sh -# usage: sh paypal_build_invoices /g/var/paypal_invoices/??? +# $Id: paypal_build_invoices,v 1.22 2011/12/02 04:08:46 gilles Exp gilles $ + +# usage: sh paypal_build_invoices /g/var/paypal_invoices/???? lyx -e latex /home/gilles/public_html/AGIL/factures/000/facture_imapsync-000.lyx cp /home/gilles/public_html/AGIL/factures/000/facture_imapsync-000.tex /g/var/paypal_invoices/ @@ -19,11 +21,19 @@ set -x #/g/public_html/imapsync/W/paypal_reply/paypal_bilan --write_invoices --first_in 999 /g/paypal/paypal_2011_09_complet.csv #/g/public_html/imapsync/W/paypal_reply/paypal_bilan --write_invoices --first_in 1094 /g/paypal/paypal_2011_10_complet.csv /g/public_html/imapsync/W/paypal_reply/paypal_bilan --write_invoices --first_in 1185 /g/paypal/paypal_2011_11_complet.csv +/g/public_html/imapsync/W/paypal_reply/paypal_bilan --write_invoices --first_in 1263 /g/paypal/paypal_2011_12_complet.csv +: /g/public_html/imapsync/W/paypal_reply/paypal_bilan --first_in 294 --usdeur 1.3385 /g/paypal/paypal_2011_01_complet.csv +: /g/public_html/imapsync/W/paypal_reply/paypal_bilan --first_in 382 /g/paypal/paypal_2011_02_complet.csv +: /g/public_html/imapsync/W/paypal_reply/paypal_bilan --first_in 473 /g/paypal/paypal_2011_03_complet.csv +: /g/public_html/imapsync/W/paypal_reply/paypal_bilan --first_in 570 /g/paypal/paypal_2011_04_complet.csv +: /g/public_html/imapsync/W/paypal_reply/paypal_bilan --first_in 645 /g/paypal/paypal_2011_05_complet.csv +: /g/public_html/imapsync/W/paypal_reply/paypal_bilan --first_in 733 /g/paypal/paypal_2011_06_complet.csv : /g/public_html/imapsync/W/paypal_reply/paypal_bilan --first_in 824 /g/paypal/paypal_2011_07_complet.csv : /g/public_html/imapsync/W/paypal_reply/paypal_bilan --first_in 917 /g/paypal/paypal_2011_08_complet.csv : /g/public_html/imapsync/W/paypal_reply/paypal_bilan --first_in 1094 /g/paypal/paypal_2011_10_complet.csv : /g/public_html/imapsync/W/paypal_reply/paypal_bilan --first_in 1185 /g/paypal/paypal_2011_11_complet.csv +: /g/public_html/imapsync/W/paypal_reply/paypal_bilan --first_in 1263 /g/paypal/paypal_2011_12_complet.csv set +x # La totale @@ -35,6 +45,9 @@ set +x --first_in 147 --avoid_numbers '292 293 643 644 731 732 1093' \ /g/paypal/paypal_201?_??_complet.csv +echo 'sh paypal_build_invoices /g/var/paypal_invoices/1???' + + # USD de 147 à 340 # EUR de 341 à ... @@ -81,8 +94,6 @@ set +x # 556 TVA 4,92 # 563 TVA 4,92 -echo 'sh paypal_build_invoices /g/var/paypal_invoices/???' - for d in "$@"; do echo "==== $d ====" cd $d diff --git a/W/paypal_reply/paypal_build_reply b/W/paypal_reply/paypal_build_reply index 326e2d8..9edf6e1 100755 --- a/W/paypal_reply/paypal_build_reply +++ b/W/paypal_reply/paypal_build_reply @@ -1,6 +1,6 @@ #!/usr/bin/perl -# $Id: paypal_build_reply,v 1.16 2011/05/31 21:25:48 gilles Exp gilles $ +# $Id: paypal_build_reply,v 1.17 2011/12/07 23:47:03 gilles Exp gilles $ use warnings; use strict; @@ -99,15 +99,18 @@ while(<>) { my $address = 'gilles.lamiral@laposte.net'; my $address2 = 'gilles@lamiral.info'; -my $rcstag = '$Id: paypal_build_reply,v 1.16 2011/05/31 21:25:48 gilles Exp gilles $'; +my $rcstag = '$Id: paypal_build_reply,v 1.17 2011/12/07 23:47:03 gilles Exp gilles $'; my $download_info = "You will find the latest imapsync.exe binary (release $release_exe) and the latest imapsync source code (release $release) at the following link: $url" ; -my $next_releases ="Next imapsync releases will be available for one year without extra payment. -Just keep this message and ask for the new links. -(I will build an automatic subscription tool soon)" ; +my $next_releases = +"Next imapsync releases will be available to you for one year without extra payment. +You'll be subscribed to a newsletter [imapsync_update] announcing new releases. +Just keep this message and ask for the new links in case you miss the newsletter. +Run imapsync without any argument to know if a new release is available." ; + my $thanks_software = "I thank you for buying and using imapsync, I wish you successful transfers!" ; diff --git a/W/paypal_reply/paypal_functions b/W/paypal_reply/paypal_functions index 6565c6d..01f85b8 100755 --- a/W/paypal_reply/paypal_functions +++ b/W/paypal_reply/paypal_functions @@ -1,6 +1,6 @@ #!/bin/sh -# $Id: paypal_functions,v 1.17 2011/05/31 21:26:24 gilles Exp gilles $ +# $Id: paypal_functions,v 1.18 2011/12/02 01:56:55 gilles Exp gilles $ paypal_prerequisites() { perl -mMIME::Lite -e '' || echo 'sudo aptitude install libmime-lite-perl' @@ -154,7 +154,7 @@ send_reply() { debug_mode && echo "paypal_send $f" test -f "$d_sent/$b" && continue mkdir -p "$d_sent" - test X"--send" = X"$1" && paypal_send --send "$f" && touch "$d_sent/$b" + test X"--send" = X"$1" && paypal_send --send --subscribe "$f" && touch "$d_sent/$b" #test X"--send" = X"$1" && touch "$d_sent/$b" test X"" = X"$1" && paypal_send "$f" done diff --git a/W/paypal_reply/paypal_send b/W/paypal_reply/paypal_send index 185ca40..f4515de 100755 --- a/W/paypal_reply/paypal_send +++ b/W/paypal_reply/paypal_send @@ -1,6 +1,6 @@ #!/usr/bin/perl -# $Id: paypal_send,v 1.3 2010/12/29 23:50:24 gilles Exp gilles $ +# $Id: paypal_send,v 1.7 2011/12/02 02:36:28 gilles Exp gilles $ use strict; use warnings; @@ -11,6 +11,7 @@ my ( $help, $debug, $send, + $subscribe, ); my $numopt = scalar(@ARGV); @@ -18,6 +19,7 @@ my $opt_ret = GetOptions( "help" => \$help, "debug!" => \$debug, "send!" => \$send, + "subscribe!" => \$subscribe, ); usage() and exit if ($help or ! $numopt or ! $opt_ret) ; @@ -46,10 +48,18 @@ $message->build(%header); $message->build(Data => $data); $message->print(\*STDOUT); +my $dest = $header{ 'To:' } ; -if ($send) { - $message->send; - print "Sent to ", $header{'To:'},"\n"; +if ( $send ) { + $message->send ; + print "\nSent to $dest\n" ; +} + +if ( $subscribe ) { + print "\necho '$dest' | add_members --regular-members-file=- --welcome-msg=y imapsync_update\n" ; + my $out = `echo '$dest' | sudo add_members --regular-members-file=- --welcome-msg=y imapsync_update` ; + print $out ; + print "Subscribed $dest\n" ; } diff --git a/imapsync b/imapsync index 6d2caea..b0eb113 100755 --- a/imapsync +++ b/imapsync @@ -17,10 +17,10 @@ imapsync - IMAP synchronisation, sync, copy or migration tool. Synchronise mailboxes between two imap servers. -Good at IMAP migration. More than 36 different IMAP server softwares +Good at IMAP migration. More than 44 different IMAP server softwares supported with success. -$Revision: 1.468 $ +$Revision: 1.476 $ =head1 SYNOPSIS @@ -140,9 +140,7 @@ and the transfer is done only once. All flags are preserved, unread will stay unread, read will stay read, deleted will stay deleted. You can stop the transfer at any time and restart it later, imapsync works well with bad -connections. imapsync is CPU hungry so nice and renice -commands can be a good help. imapsync can be memory hungry too, -especially with large messages. +connections. You can decide to delete the messages from the source mailbox after a successful transfer (it is a good feature when migrating). @@ -156,6 +154,12 @@ You can also just synchronize a mailbox A from another mailbox B in case you just want to keep a "live" copy of B in A (--delete2 may help) +imapsync is not adequate for maintaining two active imap accounts +in synchronization where the user plays independently on both sides. +Use offlineimap (written by John Goerzen) or mbsync (written by +Michael R. Elkins) for 2 ways synchronizations. + + =head1 OPTIONS To get a description of each option just invoke: @@ -496,28 +500,25 @@ Entries for imapsync: =head1 SIMILAR SOFTWARES imap_tools : http://www.athensfbc.com/imap_tools - offlineimap : http://software.complete.org/offlineimap + offlineimap : https://github.com/nicolas33/offlineimap + mbsync : http://isync.sourceforge.net/ mailsync : http://mailsync.sourceforge.net/ - imapxfer : http://www.washington.edu/imap/ - part of the imap-utils from UW. - mailutil : replace imapxfer in - part of the imap-utils from UW. - http://www.gsp.com/cgi-bin/man.cgi?topic=mailutil + mailutil : http://www.washington.edu/imap/ + part of the UW IMAP tookit. imaprepl : http://www.bl0rg.net/software/ - http://freshmeat.net/projects/imap-repl/ - imap_migrate : http://freshmeat.net/projects/imapmigration/ + http://freecode.com/projects/imap-repl/ imapcopy : http://home.arcor.de/armin.diehl/imapcopy/imapcopy.html migrationtool : http://sourceforge.net/projects/migrationtool/ imapmigrate : http://sourceforge.net/projects/cyrus-utils/ wonko_imapsync: http://wonko.com/article/554 - see also tools/wonko_ruby_imapsync - isync : http://isync.sourceforge.net/ + see also file W/tools/wonko_ruby_imapsync + exchange-away : http://exchange-away.sourceforge.net/ pop2imap : http://www.linux-france.org/prj/pop2imap/ Feedback (good or bad) will often be welcome. -$Id: imapsync,v 1.468 2011/11/18 01:23:37 gilles Exp gilles $ +$Id: imapsync,v 1.476 2011/12/10 01:33:50 gilles Exp gilles $ =cut @@ -571,7 +572,7 @@ my( @folder, @include, @exclude, @folderrec, $prefix1, $prefix2, @regextrans2, @regexmess, @regexflag, - $flagsCase, + $flagsCase, $filterflags, $sep1, $sep2, $syncinternaldates, $idatefromheader, @@ -625,13 +626,14 @@ my( $delete2folders, $delete2foldersonly, $delete2foldersbutnot, $usecache, $debugcache, $cacheaftercopy, $wholeheaderifneeded, %h1_msgs_copy_by_uid, $useuid, $h2_uidguess, + $addheader, ); # main program # global variables initialisation -$rcs = '$Id: imapsync,v 1.468 2011/11/18 01:23:37 gilles Exp gilles $ '; +$rcs = '$Id: imapsync,v 1.476 2011/12/10 01:33:50 gilles Exp gilles $ '; $total_bytes_transferred = 0; $total_bytes_skipped = 0; @@ -695,6 +697,9 @@ $wholeheaderifneeded = defined( $wholeheaderifneeded ) ? $wholeheaderifneeded # turn on RFC standard flags correction like \SEEN -> \Seen $flagsCase = defined( $flagsCase ) ? $flagsCase : 1 ; +# Use PERMANENTFLAGS if available +$filterflags = defined( $filterflags ) ? $filterflags : 1 ; + # turn on relogin 5 by default $relogin1 = defined( $relogin1 ) ? $relogin1 : 5 ; $relogin2 = defined( $relogin2 ) ? $relogin2 : 5 ; @@ -723,8 +728,8 @@ check_lib_version() or exit_clean(0) if ($justbanner); # By default, 1000 at a time, not more. -$split1 ||= 1000; -$split2 ||= 1000; +$split1 ||= 500; +$split2 ||= 500; $host1 || missing_option("--host1") ; $port1 ||= (defined $ssl1 and !defined $tls1) ? 993 : 143; @@ -848,7 +853,7 @@ $fastio2 = (defined($fastio2)) ? $fastio2 : 0; $reconnectretry1 = (defined($reconnectretry1)) ? $reconnectretry1 : 3; $reconnectretry2 = (defined($reconnectretry2)) ? $reconnectretry2 : 3; -@useheader = ( "Message-Id", "Message-ID", "Date" ) unless ( @useheader ) ; +@useheader = ( "Message-Id", "Message-ID", "Received" ) unless ( @useheader ) ; my %useheader ; @@ -1188,7 +1193,7 @@ FOLDER: foreach my $h1_fold (@h1_folders_wanted) { $debug and print "Host1 getting flags idate and sizes of folder [$h1_fold] took ", timenext(), " s\n"; unless ($h1_fir_ref) { print - "Host1 folder $h1_fold: Could not fetch_hash_2 ", + "Host1 folder $h1_fold: Could not fetch_hash ", scalar(@h1_msgs), " msgs: ", $imap1->LastError, "\n"; $nb_errors++; next FOLDER; @@ -1223,7 +1228,7 @@ FOLDER: foreach my $h1_fold (@h1_folders_wanted) { $debug and print "Host2 parsing headers of folder [$h2_fold] took ", timenext(), " s\n" ; $debug and print "Host2 getting flags idate and sizes of folder [$h2_fold]\n" ; - @$h2_fir_ref{@h2_msgs} = ( ); # fetch_hash_2 can select by uid with last arg as ref + @$h2_fir_ref{@h2_msgs} = ( ); # fetch_hash can select by uid with last arg as ref $h2_fir_ref = $imap2->fetch_hash("FLAGS", "INTERNALDATE", "RFC822.SIZE", $h2_fir_ref) if (@h2_msgs); $debug and print "Host2 getting flags idate and sizes of folder [$h2_fold] took ", timenext(), " s\n" ; @@ -1407,11 +1412,14 @@ sub sync_flags { my $h1_flags = $h1_fir_ref->{ $h1_msg }->{ "FLAGS" } || '' ; my $h2_flags = $h2_fir_ref->{ $h2_msg }->{ "FLAGS" } || '' ; + ( $debug or $debugflags ) and + print "init msg h1 $h1_fold/$h1_msg flags( $h1_flags ) h2 $h2_fold/$h2_msg flags( $h2_flags )\n" ; + # RFC 2060: This flag can not be altered by any client $h1_flags =~ s@\\Recent\s?@@gi ; $h1_flags = flags_regex( $h1_flags ) if @regexflag; $h1_flags = flagsCase( $h1_flags ) if $flagsCase ; - $h1_flags = flags_filter( $h1_flags, $permanentflags2) if ( $permanentflags2 ) ; + $h1_flags = flags_filter( $h1_flags, $permanentflags2) if ( $permanentflags2 and $filterflags ) ; # compare flags - set flags if there a difference my @h1_flags = sort split(' ', $h1_flags ); @@ -1419,7 +1427,7 @@ sub sync_flags { my $diff = compare_lists( \@h1_flags, \@h2_flags ); #$diff = 1 ; - $debugflags and print "msg h1 $h1_fold/$h1_msg flags( $h1_flags ) h2 $h2_fold/$h2_msg flags( $h2_flags )\n" ; + ( $debug or $debugflags ) and print "filt msg h1 $h1_fold/$h1_msg flags( $h1_flags ) h2 $h2_fold/$h2_msg flags( $h2_flags )\n" ; $diff and ( $debug or $debugflags ) and print "msg $h2_fold/$h2_msg replacing h2 flags( $h2_flags ) with h1 flags( $h1_flags )\n"; # This sets flags so flags can be removed with this @@ -1837,8 +1845,8 @@ sub banner_imapsync { my @argv_copy = @_; my $banner_imapsync = join("", '$RCSfile: imapsync,v $ ', - '$Revision: 1.468 $ ', - '$Date: 2011/11/18 01:23:37 $ ', + '$Revision: 1.476 $ ', + '$Date: 2011/12/10 01:33:50 $ ', "\n",localhost_info(), "\n", "Command line used:\n", "$0 ", command_line_nopassword(@argv_copy), "\n", @@ -2289,7 +2297,7 @@ sub foldersizes { printf ( "Nb messages: %11s\n", $total_nb ) ; printf ( "Total size: %11s bytes\n", $total_size ) ; printf ( "Biggest message: %11s bytes\n", $biggest ) ; - printf ( "Time: %11s secondes\n", timenext( ) ) ; + printf ( "Time: %11s seconds\n", timenext( ) ) ; } sub timenext { @@ -2693,6 +2701,11 @@ sub copy_message { $debug and print "header date from host1: [$h1_date] (fixed)\n"; } + if ( $addheader and defined $h1_fir_ref->{$h1_msg}->{"NO_HEADER"} ) { + my $header = add_header( $h1_msg ) ; + $debug and print "msg $h1_fold/$h1_msg adding custom header [$header]\n" ; + $string = $header . "\r\n" . $string ; + } # RFC 2060: This flag can not be altered by any client $h1_flags =~ s@\\Recent\s?@@gi; $h1_flags = flags_regex($h1_flags) if @regexflag; @@ -3260,6 +3273,9 @@ sub stats { $timeend = time(); $timediff = $timeend - $timestart; + my $timestart_str = localtime( $timestart ) ; + my $timeend_str = localtime( $timeend ) ; + my $memory_consumption = memory_consumption(); my $memory_ratio = ($max_msg_size_in_bytes) ? sprintf('%.1f', $memory_consumption / $max_msg_size_in_bytes) : "NA"; @@ -3268,6 +3284,8 @@ sub stats { my $host2_reconnect_count = $imap2->Reconnect_counter() || 0; print "++++ Statistics\n"; + print "Transfer started on : $timestart_str\n"; + print "Transfer ended on : $timeend_str\n"; print "Transfer time : $timediff sec\n"; print "Messages transferred : $nb_msg_transferred "; print "(could be $nb_msg_skipped_dry_mode without dry mode)" if ($dry); @@ -3355,6 +3373,7 @@ sub get_options { "regextrans2=s" => \@regextrans2, "regexmess=s" => \@regexmess, "regexflag=s" => \@regexflag, + "filterflags!" => \$filterflags, "flagsCase!" => \$flagsCase, "delete!" => \$delete, "delete2!" => \$delete2, @@ -3424,6 +3443,7 @@ sub get_options { "cacheaftercopy!" => \$cacheaftercopy, "debugcache!" => \$debugcache, "useuid!" => \$useuid, + "addheader!" => \$addheader, ); $debug and print "get options: [$opt_ret]\n"; @@ -3518,6 +3538,13 @@ sub parse_header_msg { } } + if ( ( ! $headstr) and ( $addheader ) and ( $s eq "Host1" )){ + my $header = add_header( $m_uid ) ; + print "Host1 uid $m_uid no header found so adding our own [$header]\n"; + $headstr .= uc( $header ) ; + $s_fir->{$m_uid}->{"NO_HEADER"} = 1; + } + return() if ( ! $headstr ); my $size = $s_fir->{$m_uid}->{"RFC822.SIZE"}; @@ -3606,7 +3633,7 @@ sub check_last_release { } sub imapsync_version { - my $rcs = '$Id: imapsync,v 1.468 2011/11/18 01:23:37 gilles Exp gilles $ '; + my $rcs = '$Id: imapsync,v 1.476 2011/12/10 01:33:50 gilles Exp gilles $ '; $rcs =~ m/,v (\d+\.\d+)/; my $VERSION = ($1) ? $1: "UNKNOWN"; return($VERSION); @@ -3896,7 +3923,7 @@ sub usage_complete { --reconnectretry2 : same as --reconnectretry1 but for host2 --split1 : split the requests in several parts on host1. is the number of messages handled per request. - default is like --split1 1000. + default is like --split1 500. --split2 : same thing on host2. --timeout : imap connect timeout. @@ -4382,12 +4409,24 @@ sub tests_epoch { ok( '1282658400' eq epoch( '24-Aug-2010 14:01:00 +0001' ), 'epoch 24-Aug-2010 14:01:00 +0001 -> 1282658400' ) ; } +sub add_header { + my $uid = shift || 'mistake' ; + my $header = 'Message-Id: <' . $uid . '@imapsync>' ; + return( $header ) ; +} + +sub tests_add_header { + ok( 'Message-Id: ' eq add_header(), 'add_header no arg' ) ; + ok( 'Message-Id: <123456789@imapsync>' eq add_header(123456789), 'add_header 123456789' ) ; + +} + + sub tests_debug { SKIP: { skip "No test in normal run" if ( not $tests_debug ); - tests_good_date(); - tests_epoch( ) ; + tests_add_header( ) ; } } diff --git a/index.shtml b/index.shtml index cb2253b..c1a0071 100644 --- a/index.shtml +++ b/index.shtml @@ -5,7 +5,7 @@ Imapsync: an IMAP migration tool ( release <!--#exec cmd="cat VERSION"--> ) - + @@ -31,7 +31,7 @@ @@ -44,23 +44,27 @@

What is imapsync?

imapsync software is a command line tool allowing incremental and -recursive imap transfers from one mailbox to another, both anywhere on the internet -or in your local network. +recursive IMAP transfers from one mailbox to another, both anywhere on the internet +or in your local network. Incremental means you can stop the transfer at any time +and restart it later efficiently. Recursive means all folders hierarchy can be copied.

imapsync is useful for imap account migration or imap account backup.

-

imapsync is not adequate for maintaining two active imap accounts in synchronization -where the user plays independently on both sides. Use offlineimap -(written by John Goerzen) for this purpose. + +

imapsync is not adequate for maintaining two active imap accounts +in synchronization where the user plays independently on both sides. +Use offlineimap (written by John Goerzen) +or mbsync (written by Michael R. Elkins) +for 2 ways synchronizations.

Some numbers for 2011

  • Number of imapsync users per month: between 2 and 3 thousands users
    • -
  • Number of imapsync transfers per month: between 3 and 11 millions transfers
    • +
  • Number of imapsync transfers per month: between 3 and 11 millions mailboxes transfers
  • Pourcentage between operating systems users running imapsync:
    • Linux: 65 %
      • @@ -142,18 +146,26 @@ where the user plays independently on both sides. Use offlineimap imapsync mailing-list (see below section Mailing-List).

      -

      Buy imapsync source code

      -

      -The Perl imapsync source code will run anywhere a Perl interpreter can run: any Unix, Linux, Windows, or Mac OS operating system. -

      + +

      Buy imapsync source code

      Buy latest imapsync Perl source code for 30 EUR

      + +

      ++ One year of imapsync updates without extra payment.
      ++ 30 days money-back guarantee!
      ++ A little support. +

      +

      30 EUR is equal to around 45 USD, no problem to pay in USD (or any currency) with paypal:

      +

      +The Perl imapsync source code will run anywhere a Perl interpreter can run: any Unix, Linux, Windows, or Mac OS operating system. +

      @@ -170,14 +182,14 @@ name="submit" alt="PayPal - The safer, easier way to pay online!"/>

      - - -

      You will receive a download link just after the payment.
      -One year of imapsync updates without extra payment.
      -30 days money-back guarantee!

      +

      You will receive a download link just after the payment. +

      Buy professional support for imapsync

      +

      You will be able to expose your issues by email or phone and to converse until your issues are solved. +

      +

      For 180 EUR buy imapsync support by the developper who wrote and maintains imapsync.

      @@ -197,14 +209,22 @@ name="submit" alt="PayPal - The safer, easier way to pay online!"/>

      -

      Then you will be able to expose your issues by email or phone and to converse until your issues are solved. -

      Buy standalone imapsync.exe for win32

      + + +

      Struggle free from source code and Perl installation by
      buying the latest win32 standalone imapsync.exe for 30 EUR

      +

      ++ One year of imapsync updates without extra payment.
      ++ 30 days money-back guarantee!
      ++ A little support. +

      + +

      30 EUR is equal to around 45 USD, no problem to pay in USD (or any currency) with paypal:

      @@ -225,8 +245,7 @@ name="submit" alt="PayPal - The safer, easier way to pay online!"/>

      You will receive a download link just after the payment.
      -One year of imapsync updates without extra payment.
      -30 days money-back guarantee!

      +

      This document last modified on -($Id: index.shtml,v 1.97 2011/11/18 16:11:33 gilles Exp gilles $) +($Id: index.shtml,v 1.99 2011/11/24 09:38:35 gilles Exp gilles $)

      diff --git a/learn/zzz b/learn/zzz deleted file mode 100644 index 72e95a1..0000000 --- a/learn/zzz +++ /dev/null @@ -1,1226 +0,0 @@ -execve("./io_socket_get", ["./io_socket_get"], [/* 44 vars */]) = 0 -brk(0) = 0x9865000 -access("/etc/ld.so.nohwcap", F_OK) = -1 ENOENT (No such file or directory) -mmap2(NULL, 8192, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0) = 0xb7888000 -access("/etc/ld.so.preload", R_OK) = -1 ENOENT (No such file or directory) -open("/etc/ld.so.cache", O_RDONLY) = 3 -fstat64(3, {st_mode=S_IFREG|0644, st_size=70776, ...}) = 0 -mmap2(NULL, 70776, PROT_READ, MAP_PRIVATE, 3, 0) = 0xb7876000 -close(3) = 0 -access("/etc/ld.so.nohwcap", F_OK) = -1 ENOENT (No such file or directory) -open("/lib/tls/i686/cmov/libdl.so.2", O_RDONLY) = 3 -read(3, "\177ELF\1\1\1\0\0\0\0\0\0\0\0\0\3\0\3\0\1\0\0\0 \n\0\0004\0\0\0D"..., 512) = 512 -fstat64(3, {st_mode=S_IFREG|0644, st_size=9676, ...}) = 0 -mmap2(NULL, 12408, PROT_READ|PROT_EXEC, MAP_PRIVATE|MAP_DENYWRITE, 3, 0) = 0xb7872000 -mmap2(0xb7874000, 8192, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_FIXED|MAP_DENYWRITE, 3, 0x1) = 0xb7874000 -close(3) = 0 -access("/etc/ld.so.nohwcap", F_OK) = -1 ENOENT (No such file or directory) -open("/lib/tls/i686/cmov/libm.so.6", O_RDONLY) = 3 -read(3, "\177ELF\1\1\1\0\0\0\0\0\0\0\0\0\3\0\3\0\1\0\0\0@4\0\0004\0\0\0P"..., 512) = 512 -fstat64(3, {st_mode=S_IFREG|0644, st_size=149328, ...}) = 0 -mmap2(NULL, 151680, PROT_READ|PROT_EXEC, MAP_PRIVATE|MAP_DENYWRITE, 3, 0) = 0xb784c000 -mmap2(0xb7870000, 8192, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_FIXED|MAP_DENYWRITE, 3, 0x23) = 0xb7870000 -close(3) = 0 -access("/etc/ld.so.nohwcap", F_OK) = -1 ENOENT (No such file or directory) -open("/lib/tls/i686/cmov/libpthread.so.0", O_RDONLY) = 3 -read(3, "\177ELF\1\1\1\0\0\0\0\0\0\0\0\0\3\0\3\0\1\0\0\0000H\0\0004\0\0\0\330"..., 512) = 512 -fstat64(3, {st_mode=S_IFREG|0755, st_size=116405, ...}) = 0 -mmap2(NULL, 4096, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0) = 0xb784b000 -mmap2(NULL, 98780, PROT_READ|PROT_EXEC, MAP_PRIVATE|MAP_DENYWRITE, 3, 0) = 0xb7832000 -mmap2(0xb7847000, 8192, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_FIXED|MAP_DENYWRITE, 3, 0x14) = 0xb7847000 -mmap2(0xb7849000, 4572, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_FIXED|MAP_ANONYMOUS, -1, 0) = 0xb7849000 -close(3) = 0 -access("/etc/ld.so.nohwcap", F_OK) = -1 ENOENT (No such file or directory) -open("/lib/tls/i686/cmov/libc.so.6", O_RDONLY) = 3 -read(3, "\177ELF\1\1\1\0\0\0\0\0\0\0\0\0\3\0\3\0\1\0\0\0\320h\1\0004\0\0\0\344"..., 512) = 512 -fstat64(3, {st_mode=S_IFREG|0755, st_size=1442180, ...}) = 0 -mmap2(NULL, 1451632, PROT_READ|PROT_EXEC, MAP_PRIVATE|MAP_DENYWRITE, 3, 0) = 0xb76cf000 -mprotect(0xb782b000, 4096, PROT_NONE) = 0 -mmap2(0xb782c000, 12288, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_FIXED|MAP_DENYWRITE, 3, 0x15c) = 0xb782c000 -mmap2(0xb782f000, 9840, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_FIXED|MAP_ANONYMOUS, -1, 0) = 0xb782f000 -close(3) = 0 -access("/etc/ld.so.nohwcap", F_OK) = -1 ENOENT (No such file or directory) -open("/lib/tls/i686/cmov/libcrypt.so.1", O_RDONLY) = 3 -read(3, "\177ELF\1\1\1\0\0\0\0\0\0\0\0\0\3\0\3\0\1\0\0\0 \7\0\0004\0\0\0008"..., 512) = 512 -fstat64(3, {st_mode=S_IFREG|0644, st_size=38296, ...}) = 0 -mmap2(NULL, 201052, PROT_READ|PROT_EXEC, MAP_PRIVATE|MAP_DENYWRITE, 3, 0) = 0xb769d000 -mmap2(0xb76a6000, 8192, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_FIXED|MAP_DENYWRITE, 3, 0x8) = 0xb76a6000 -mmap2(0xb76a8000, 155996, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_FIXED|MAP_ANONYMOUS, -1, 0) = 0xb76a8000 -close(3) = 0 -mmap2(NULL, 4096, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0) = 0xb769c000 -set_thread_area({entry_number:-1 -> 6, base_addr:0xb769c8d0, limit:1048575, seg_32bit:1, contents:0, read_exec_only:0, limit_in_pages:1, seg_not_present:0, useable:1}) = 0 -open("/dev/urandom", O_RDONLY) = 3 -read(3, "\323H$"..., 3) = 3 -close(3) = 0 -mprotect(0xb76a6000, 4096, PROT_READ) = 0 -mprotect(0xb782c000, 8192, PROT_READ) = 0 -mprotect(0xb7847000, 4096, PROT_READ) = 0 -mprotect(0xb7870000, 4096, PROT_READ) = 0 -mprotect(0xb7874000, 4096, PROT_READ) = 0 -mprotect(0x817c000, 4096, PROT_READ) = 0 -mprotect(0xb78a7000, 4096, PROT_READ) = 0 -munmap(0xb7876000, 70776) = 0 -set_tid_address(0xb769c918) = 11827 -set_robust_list(0xb769c920, 0xc) = 0 -futex(0xbfef7c10, FUTEX_WAKE_PRIVATE, 1) = 0 -rt_sigaction(SIGRTMIN, {0xb78362e0, [], SA_SIGINFO}, NULL, 8) = 0 -rt_sigaction(SIGRT_1, {0xb7836720, [], SA_RESTART|SA_SIGINFO}, NULL, 8) = 0 -rt_sigprocmask(SIG_UNBLOCK, [RTMIN RT_1], NULL, 8) = 0 -getrlimit(RLIMIT_STACK, {rlim_cur=8192*1024, rlim_max=RLIM_INFINITY}) = 0 -uname({sys="Linux", node="petite", ...}) = 0 -rt_sigaction(SIGFPE, {SIG_IGN}, {SIG_DFL}, 8) = 0 -brk(0) = 0x9865000 -brk(0x9886000) = 0x9886000 -getuid32() = 1000 -geteuid32() = 1000 -getgid32() = 1000 -getegid32() = 1000 -open("/usr/lib/locale/locale-archive", O_RDONLY|O_LARGEFILE) = -1 ENOENT (No such file or directory) -open("/usr/share/locale/locale.alias", O_RDONLY) = 3 -fstat64(3, {st_mode=S_IFREG|0644, st_size=2570, ...}) = 0 -mmap2(NULL, 4096, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0) = 0xb7887000 -read(3, "# Locale name alias data base.\n# "..., 4096) = 2570 -read(3, ""..., 4096) = 0 -close(3) = 0 -munmap(0xb7887000, 4096) = 0 -open("/usr/lib/locale/fr_FR.UTF-8/LC_IDENTIFICATION", O_RDONLY) = -1 ENOENT (No such file or directory) -open("/usr/lib/locale/fr_FR.utf8/LC_IDENTIFICATION", O_RDONLY) = 3 -fstat64(3, {st_mode=S_IFREG|0644, st_size=311, ...}) = 0 -mmap2(NULL, 311, PROT_READ, MAP_PRIVATE, 3, 0) = 0xb7887000 -close(3) = 0 -open("/usr/lib/gconv/gconv-modules.cache", O_RDONLY) = 3 -fstat64(3, {st_mode=S_IFREG|0644, st_size=26048, ...}) = 0 -mmap2(NULL, 26048, PROT_READ, MAP_SHARED, 3, 0) = 0xb7880000 -close(3) = 0 -futex(0xb782ea4c, FUTEX_WAKE_PRIVATE, 2147483647) = 0 -open("/usr/lib/locale/fr_FR.UTF-8/LC_MEASUREMENT", O_RDONLY) = -1 ENOENT (No such file or directory) -open("/usr/lib/locale/fr_FR.utf8/LC_MEASUREMENT", O_RDONLY) = 3 -fstat64(3, {st_mode=S_IFREG|0644, st_size=23, ...}) = 0 -mmap2(NULL, 23, PROT_READ, MAP_PRIVATE, 3, 0) = 0xb787f000 -close(3) = 0 -open("/usr/lib/locale/fr_FR.UTF-8/LC_TELEPHONE", O_RDONLY) = -1 ENOENT (No such file or directory) -open("/usr/lib/locale/fr_FR.utf8/LC_TELEPHONE", O_RDONLY) = 3 -fstat64(3, {st_mode=S_IFREG|0644, st_size=56, ...}) = 0 -mmap2(NULL, 56, PROT_READ, MAP_PRIVATE, 3, 0) = 0xb787e000 -close(3) = 0 -open("/usr/lib/locale/fr_FR.UTF-8/LC_ADDRESS", O_RDONLY) = -1 ENOENT (No such file or directory) -open("/usr/lib/locale/fr_FR.utf8/LC_ADDRESS", O_RDONLY) = 3 -fstat64(3, {st_mode=S_IFREG|0644, st_size=153, ...}) = 0 -mmap2(NULL, 153, PROT_READ, MAP_PRIVATE, 3, 0) = 0xb787d000 -close(3) = 0 -open("/usr/lib/locale/fr_FR.UTF-8/LC_NAME", O_RDONLY) = -1 ENOENT (No such file or directory) -open("/usr/lib/locale/fr_FR.utf8/LC_NAME", O_RDONLY) = 3 -fstat64(3, {st_mode=S_IFREG|0644, st_size=71, ...}) = 0 -mmap2(NULL, 71, PROT_READ, MAP_PRIVATE, 3, 0) = 0xb787c000 -close(3) = 0 -open("/usr/lib/locale/fr_FR.UTF-8/LC_PAPER", O_RDONLY) = -1 ENOENT (No such file or directory) -open("/usr/lib/locale/fr_FR.utf8/LC_PAPER", O_RDONLY) = 3 -fstat64(3, {st_mode=S_IFREG|0644, st_size=34, ...}) = 0 -mmap2(NULL, 34, PROT_READ, MAP_PRIVATE, 3, 0) = 0xb787b000 -close(3) = 0 -open("/usr/lib/locale/fr_FR.UTF-8/LC_MESSAGES", O_RDONLY) = -1 ENOENT (No such file or directory) -open("/usr/lib/locale/fr_FR.utf8/LC_MESSAGES", O_RDONLY) = 3 -fstat64(3, {st_mode=S_IFDIR|0755, st_size=4096, ...}) = 0 -close(3) = 0 -open("/usr/lib/locale/fr_FR.utf8/LC_MESSAGES/SYS_LC_MESSAGES", O_RDONLY) = 3 -fstat64(3, {st_mode=S_IFREG|0644, st_size=54, ...}) = 0 -mmap2(NULL, 54, PROT_READ, MAP_PRIVATE, 3, 0) = 0xb787a000 -close(3) = 0 -open("/usr/lib/locale/fr_FR.UTF-8/LC_MONETARY", O_RDONLY) = -1 ENOENT (No such file or directory) -open("/usr/lib/locale/fr_FR.utf8/LC_MONETARY", O_RDONLY) = 3 -fstat64(3, {st_mode=S_IFREG|0644, st_size=290, ...}) = 0 -mmap2(NULL, 290, PROT_READ, MAP_PRIVATE, 3, 0) = 0xb7879000 -close(3) = 0 -open("/usr/lib/locale/fr_FR.UTF-8/LC_COLLATE", O_RDONLY) = -1 ENOENT (No such file or directory) -open("/usr/lib/locale/fr_FR.utf8/LC_COLLATE", O_RDONLY) = 3 -fstat64(3, {st_mode=S_IFREG|0644, st_size=962094, ...}) = 0 -mmap2(NULL, 962094, PROT_READ, MAP_PRIVATE, 3, 0) = 0xb75b1000 -close(3) = 0 -open("/usr/lib/locale/fr_FR.UTF-8/LC_TIME", O_RDONLY) = -1 ENOENT (No such file or directory) -open("/usr/lib/locale/fr_FR.utf8/LC_TIME", O_RDONLY) = 3 -fstat64(3, {st_mode=S_IFREG|0644, st_size=2502, ...}) = 0 -mmap2(NULL, 2502, PROT_READ, MAP_PRIVATE, 3, 0) = 0xb7878000 -close(3) = 0 -open("/usr/lib/locale/fr_FR.UTF-8/LC_NUMERIC", O_RDONLY) = -1 ENOENT (No such file or directory) -open("/usr/lib/locale/fr_FR.utf8/LC_NUMERIC", O_RDONLY) = 3 -fstat64(3, {st_mode=S_IFREG|0644, st_size=54, ...}) = 0 -mmap2(NULL, 54, PROT_READ, MAP_PRIVATE, 3, 0) = 0xb7877000 -close(3) = 0 -open("/usr/lib/locale/fr_FR.UTF-8/LC_CTYPE", O_RDONLY) = -1 ENOENT (No such file or directory) -open("/usr/lib/locale/fr_FR.utf8/LC_CTYPE", O_RDONLY) = 3 -fstat64(3, {st_mode=S_IFREG|0644, st_size=256316, ...}) = 0 -mmap2(NULL, 256316, PROT_READ, MAP_PRIVATE, 3, 0) = 0xb7572000 -close(3) = 0 -open("/dev/urandom", O_RDONLY|O_LARGEFILE) = 3 -read(3, "\5\20B\314"..., 4) = 4 -close(3) = 0 -time(NULL) = 1294544755 -readlink("/proc/self/exe", "/usr/bin/perl"..., 4095) = 13 -stat64("/usr/local/lib/site_perl/5.10.0/i486-linux-gnu-thread-multi", 0xbfef79a0) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/site_perl/5.10.0", 0xbfef79a0) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/site_perl/i486-linux-gnu-thread-multi", 0xbfef79a0) = -1 ENOENT (No such file or directory) -ioctl(0, SNDCTL_TMR_TIMEBASE or TCGETS, {B38400 opost isig icanon echo ...}) = 0 -_llseek(0, 0, 0xbfef7810, SEEK_CUR) = -1 ESPIPE (Illegal seek) -ioctl(1, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef77c8) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(1, 0, [10770], SEEK_CUR) = 0 -ioctl(2, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef77c8) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(2, 0, [10911], SEEK_CUR) = 0 -open("./io_socket_get", O_RDONLY|O_LARGEFILE) = 3 -ioctl(3, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef7898) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(3, 0, [0], SEEK_CUR) = 0 -fcntl64(3, F_SETFD, FD_CLOEXEC) = 0 -fstat64(3, {st_mode=S_IFREG|0755, st_size=2164, ...}) = 0 -rt_sigaction(SIGCHLD, NULL, {SIG_DFL}, 8) = 0 -brk(0x98a7000) = 0x98a7000 -read(3, "#!/usr/bin/perl\n\nuse warnings;\nus"..., 4096) = 2164 -stat64("/etc/perl/warnings.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/warnings.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/warnings.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/warnings.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/warnings.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/warnings.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/warnings.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/warnings.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/warnings.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/warnings.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/warnings.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/warnings.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/warnings.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/warnings.pm", {st_mode=S_IFREG|0644, st_size=13272, ...}) = 0 -open("/usr/share/perl/5.10/warnings.pm", O_RDONLY|O_LARGEFILE) = 4 -ioctl(4, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef7348) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(4, 0, [0], SEEK_CUR) = 0 -read(4, "# -*- buffer-read-only: t -*-\n# !"..., 4096) = 4096 -read(4, "00\\x10\\x00\\x00\", # [38]\n 'seve"..., 4096) = 4096 -read(4, "00\\x08\\x00\", # [41]\n 'unopened"..., 4096) = 4096 -read(4, "\n return vec($callers_bitmask,"..., 4096) = 984 -read(4, ""..., 4096) = 0 -close(4) = 0 -brk(0x98c8000) = 0x98c8000 -stat64("/etc/perl/strict.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/strict.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/strict.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/strict.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/strict.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/strict.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/strict.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/strict.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/strict.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/strict.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/strict.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/strict.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/strict.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/strict.pm", {st_mode=S_IFREG|0644, st_size=879, ...}) = 0 -open("/usr/share/perl/5.10/strict.pm", O_RDONLY|O_LARGEFILE) = 4 -ioctl(4, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef7348) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(4, 0, [0], SEEK_CUR) = 0 -read(4, "package strict;\n\n$strict::VERSION"..., 4096) = 879 -_llseek(4, 878, [878], SEEK_SET) = 0 -_llseek(4, 0, [878], SEEK_CUR) = 0 -close(4) = 0 -stat64("/etc/perl/IO/Socket.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/IO/Socket.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/IO/Socket.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/IO/Socket.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/IO/Socket.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/IO/Socket.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/IO/Socket.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/IO/Socket.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/IO/Socket.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/IO/Socket.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/IO/Socket.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/IO/Socket.pm", {st_mode=S_IFREG|0644, st_size=8370, ...}) = 0 -open("/usr/lib/perl/5.10/IO/Socket.pm", O_RDONLY|O_LARGEFILE) = 4 -ioctl(4, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef7348) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(4, 0, [0], SEEK_CUR) = 0 -read(4, "# IO::Socket.pm\n#\n# Copyright (c)"..., 4096) = 4096 -stat64("/etc/perl/IO/Handle.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/IO/Handle.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/IO/Handle.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/IO/Handle.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/IO/Handle.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/IO/Handle.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/IO/Handle.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/IO/Handle.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/IO/Handle.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/IO/Handle.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/IO/Handle.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/IO/Handle.pm", {st_mode=S_IFREG|0644, st_size=7718, ...}) = 0 -open("/usr/lib/perl/5.10/IO/Handle.pm", O_RDONLY|O_LARGEFILE) = 5 -ioctl(5, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef6eb8) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(5, 0, [0], SEEK_CUR) = 0 -read(5, "package IO::Handle;\n\nuse 5.006_00"..., 4096) = 4096 -stat64("/etc/perl/Carp.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/Carp.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/Carp.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/Carp.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/Carp.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/Carp.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/Carp.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/Carp.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/Carp.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/Carp.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/Carp.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/Carp.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/Carp.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/Carp.pm", {st_mode=S_IFREG|0644, st_size=1459, ...}) = 0 -open("/usr/share/perl/5.10/Carp.pm", O_RDONLY|O_LARGEFILE) = 6 -ioctl(6, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef6a28) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(6, 0, [0], SEEK_CUR) = 0 -read(6, "package Carp;\n\nour $VERSION = '1."..., 4096) = 1459 -_llseek(6, 1458, [1458], SEEK_SET) = 0 -_llseek(6, 0, [1458], SEEK_CUR) = 0 -close(6) = 0 -stat64("/etc/perl/Exporter.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/Exporter.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/Exporter.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/Exporter.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/Exporter.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/Exporter.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/Exporter.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/Exporter.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/Exporter.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/Exporter.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/Exporter.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/Exporter.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/Exporter.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/Exporter.pm", {st_mode=S_IFREG|0644, st_size=2280, ...}) = 0 -open("/usr/share/perl/5.10/Exporter.pm", O_RDONLY|O_LARGEFILE) = 6 -ioctl(6, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef6a28) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(6, 0, [0], SEEK_CUR) = 0 -read(6, "package Exporter;\n\nrequire 5.006;"..., 4096) = 2280 -_llseek(6, 2279, [2279], SEEK_SET) = 0 -_llseek(6, 0, [2279], SEEK_CUR) = 0 -close(6) = 0 -stat64("/etc/perl/Symbol.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/Symbol.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/Symbol.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/Symbol.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/Symbol.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/Symbol.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/Symbol.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/Symbol.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/Symbol.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/Symbol.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/Symbol.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/Symbol.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/Symbol.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/Symbol.pm", {st_mode=S_IFREG|0644, st_size=2099, ...}) = 0 -open("/usr/share/perl/5.10/Symbol.pm", O_RDONLY|O_LARGEFILE) = 6 -ioctl(6, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef6a28) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(6, 0, [0], SEEK_CUR) = 0 -read(6, "package Symbol;\n\nBEGIN { require "..., 4096) = 2099 -read(6, ""..., 4096) = 0 -close(6) = 0 -stat64("/etc/perl/SelectSaver.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/SelectSaver.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/SelectSaver.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/SelectSaver.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/SelectSaver.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/SelectSaver.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/SelectSaver.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/SelectSaver.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/SelectSaver.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/SelectSaver.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/SelectSaver.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/SelectSaver.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/SelectSaver.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/SelectSaver.pm", {st_mode=S_IFREG|0644, st_size=340, ...}) = 0 -open("/usr/share/perl/5.10/SelectSaver.pm", O_RDONLY|O_LARGEFILE) = 6 -ioctl(6, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef6a28) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(6, 0, [0], SEEK_CUR) = 0 -read(6, "package SelectSaver;\n\nour $VERSIO"..., 4096) = 340 -read(6, ""..., 4096) = 0 -close(6) = 0 -stat64("/etc/perl/IO.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/IO.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/IO.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/IO.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/IO.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/IO.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/IO.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/IO.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/IO.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/IO.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/IO.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/IO.pm", {st_mode=S_IFREG|0644, st_size=416, ...}) = 0 -open("/usr/lib/perl/5.10/IO.pm", O_RDONLY|O_LARGEFILE) = 6 -ioctl(6, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef6a28) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(6, 0, [0], SEEK_CUR) = 0 -read(6, "#\n\npackage IO;\n\nuse XSLoader ();\n"..., 4096) = 416 -stat64("/etc/perl/XSLoader.pmc", 0xbfef680c) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/XSLoader.pm", 0xbfef6784) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/XSLoader.pmc", 0xbfef680c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/XSLoader.pm", 0xbfef6784) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/XSLoader.pmc", 0xbfef680c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/XSLoader.pm", 0xbfef6784) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/XSLoader.pmc", 0xbfef680c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/XSLoader.pm", 0xbfef6784) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/XSLoader.pmc", 0xbfef680c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/XSLoader.pm", 0xbfef6784) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/XSLoader.pmc", 0xbfef680c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/XSLoader.pm", {st_mode=S_IFREG|0644, st_size=3293, ...}) = 0 -open("/usr/lib/perl/5.10/XSLoader.pm", O_RDONLY|O_LARGEFILE) = 7 -ioctl(7, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef6598) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(7, 0, [0], SEEK_CUR) = 0 -read(7, "# Generated from XSLoader.pm.PL ("..., 4096) = 3293 -brk(0x98e9000) = 0x98e9000 -_llseek(7, 3292, [3292], SEEK_SET) = 0 -_llseek(7, 0, [3292], SEEK_CUR) = 0 -close(7) = 0 -_llseek(6, 415, [415], SEEK_SET) = 0 -_llseek(6, 0, [415], SEEK_CUR) = 0 -close(6) = 0 -stat64("/usr/lib/perl/5.10/auto/IO/IO.so", {st_mode=S_IFREG|0644, st_size=17812, ...}) = 0 -stat64("/usr/lib/perl/5.10/auto/IO/IO.bs", 0x98650c0) = -1 ENOENT (No such file or directory) -futex(0xb787506c, FUTEX_WAKE_PRIVATE, 2147483647) = 0 -open("/usr/lib/perl/5.10/auto/IO/IO.so", O_RDONLY) = 6 -read(6, "\177ELF\1\1\1\0\0\0\0\0\0\0\0\0\3\0\3\0\1\0\0\0\220\24\0\0004\0\0\0\254"..., 512) = 512 -fstat64(6, {st_mode=S_IFREG|0644, st_size=17812, ...}) = 0 -mmap2(NULL, 20716, PROT_READ|PROT_EXEC, MAP_PRIVATE|MAP_DENYWRITE, 6, 0) = 0xb756c000 -mmap2(0xb7570000, 8192, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_FIXED|MAP_DENYWRITE, 6, 0x3) = 0xb7570000 -close(6) = 0 -mprotect(0xb7570000, 4096, PROT_READ) = 0 -read(5, ", $_[1], $_[2], $_[3] || 0);\n "..., 4096) = 3622 -read(5, ""..., 4096) = 0 -close(5) = 0 -stat64("/etc/perl/Socket.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/Socket.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/Socket.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/Socket.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/Socket.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/Socket.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/Socket.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/Socket.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/Socket.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/Socket.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/Socket.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/Socket.pm", {st_mode=S_IFREG|0644, st_size=3697, ...}) = 0 -open("/usr/lib/perl/5.10/Socket.pm", O_RDONLY|O_LARGEFILE) = 5 -ioctl(5, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef6eb8) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(5, 0, [0], SEEK_CUR) = 0 -read(5, "package Socket;\n\nour($VERSION, @I"..., 4096) = 3697 -stat64("/etc/perl/warnings/register.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/warnings/register.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/warnings/register.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/warnings/register.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/warnings/register.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/warnings/register.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/warnings/register.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/warnings/register.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/warnings/register.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/warnings/register.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/warnings/register.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/warnings/register.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/warnings/register.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/warnings/register.pm", {st_mode=S_IFREG|0644, st_size=732, ...}) = 0 -open("/usr/share/perl/5.10/warnings/register.pm", O_RDONLY|O_LARGEFILE) = 6 -ioctl(6, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef6a28) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(6, 0, [0], SEEK_CUR) = 0 -brk(0x990a000) = 0x990a000 -read(6, "package warnings::register;\n\nour "..., 4096) = 732 -read(6, ""..., 4096) = 0 -close(6) = 0 -read(5, ""..., 4096) = 0 -close(5) = 0 -stat64("/usr/lib/perl/5.10/auto/Socket/Socket.so", {st_mode=S_IFREG|0644, st_size=21940, ...}) = 0 -stat64("/usr/lib/perl/5.10/auto/Socket/Socket.bs", 0x98650c0) = -1 ENOENT (No such file or directory) -open("/usr/lib/perl/5.10/auto/Socket/Socket.so", O_RDONLY) = 5 -read(5, "\177ELF\1\1\1\0\0\0\0\0\0\0\0\0\3\0\3\0\1\0\0\0\260\26\0\0004\0\0\0\244"..., 512) = 512 -fstat64(5, {st_mode=S_IFREG|0644, st_size=21940, ...}) = 0 -mmap2(NULL, 20692, PROT_READ|PROT_EXEC, MAP_PRIVATE|MAP_DENYWRITE, 5, 0) = 0xb7566000 -mmap2(0xb756a000, 8192, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_FIXED|MAP_DENYWRITE, 5, 0x4) = 0xb756a000 -close(5) = 0 -mprotect(0xb756a000, 4096, PROT_READ) = 0 -stat64("/etc/perl/Errno.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/Errno.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/Errno.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/Errno.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/Errno.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/Errno.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/Errno.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/Errno.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/Errno.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/Errno.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/Errno.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/Errno.pm", {st_mode=S_IFREG|0644, st_size=5964, ...}) = 0 -open("/usr/lib/perl/5.10/Errno.pm", O_RDONLY|O_LARGEFILE) = 5 -ioctl(5, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef6eb8) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(5, 0, [0], SEEK_CUR) = 0 -read(5, "#\n# This file is auto-generated. "..., 4096) = 4096 -brk(0x992b000) = 0x992b000 -read(5, "3 }\nsub ESOCKTNOSUPPORT () { 94 }"..., 4096) = 1868 -_llseek(5, 5963, [5963], SEEK_SET) = 0 -_llseek(5, 0, [5963], SEEK_CUR) = 0 -close(5) = 0 -read(4, " set blocking behaviour.\n\n # N"..., 4096) = 4096 -read(4, "= shift;\n ${*$sock}{'io_socket"..., 4096) = 178 -_llseek(4, 8369, [8369], SEEK_SET) = 0 -_llseek(4, 0, [8369], SEEK_CUR) = 0 -close(4) = 0 -stat64("/etc/perl/IO/Socket/INET.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/IO/Socket/INET.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/IO/Socket/INET.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/IO/Socket/INET.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/IO/Socket/INET.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/IO/Socket/INET.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/IO/Socket/INET.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/IO/Socket/INET.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/IO/Socket/INET.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/IO/Socket/INET.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/IO/Socket/INET.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/IO/Socket/INET.pm", {st_mode=S_IFREG|0644, st_size=7456, ...}) = 0 -open("/usr/lib/perl/5.10/IO/Socket/INET.pm", O_RDONLY|O_LARGEFILE) = 4 -ioctl(4, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef7348) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(4, 0, [0], SEEK_CUR) = 0 -read(4, "# IO::Socket::INET.pm\n#\n# Copyrig"..., 4096) = 4096 -stat64("/etc/perl/Exporter/Heavy.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/Exporter/Heavy.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/Exporter/Heavy.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/Exporter/Heavy.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/Exporter/Heavy.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/Exporter/Heavy.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/Exporter/Heavy.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/Exporter/Heavy.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/Exporter/Heavy.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/Exporter/Heavy.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/Exporter/Heavy.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/Exporter/Heavy.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/Exporter/Heavy.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/Exporter/Heavy.pm", {st_mode=S_IFREG|0644, st_size=6335, ...}) = 0 -open("/usr/share/perl/5.10/Exporter/Heavy.pm", O_RDONLY|O_LARGEFILE) = 5 -ioctl(5, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef6eb8) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(5, 0, [0], SEEK_CUR) = 0 -brk(0x994c000) = 0x994c000 -read(5, "package Exporter::Heavy;\n\nuse str"..., 4096) = 4096 -read(5, "a leading &.\n\t # (Technique co"..., 4096) = 2239 -read(5, ""..., 4096) = 0 -close(5) = 0 -brk(0x996d000) = 0x996d000 -read(4, "hostname '\",$arg->{PeerAddr},\"'\")"..., 4096) = 3360 -_llseek(4, 7455, [7455], SEEK_SET) = 0 -_llseek(4, 0, [7455], SEEK_CUR) = 0 -close(4) = 0 -stat64("/etc/perl/IO/Socket/UNIX.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/IO/Socket/UNIX.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/IO/Socket/UNIX.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/IO/Socket/UNIX.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/IO/Socket/UNIX.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/IO/Socket/UNIX.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/IO/Socket/UNIX.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/IO/Socket/UNIX.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/IO/Socket/UNIX.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/IO/Socket/UNIX.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/IO/Socket/UNIX.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/IO/Socket/UNIX.pm", {st_mode=S_IFREG|0644, st_size=1375, ...}) = 0 -open("/usr/lib/perl/5.10/IO/Socket/UNIX.pm", O_RDONLY|O_LARGEFILE) = 4 -ioctl(4, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef7348) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(4, 0, [0], SEEK_CUR) = 0 -read(4, "# IO::Socket::UNIX.pm\n#\n# Copyrig"..., 4096) = 1375 -_llseek(4, 1374, [1374], SEEK_SET) = 0 -_llseek(4, 0, [1374], SEEK_CUR) = 0 -close(4) = 0 -stat64("/etc/perl/English.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/English.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/English.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/English.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/English.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/English.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/English.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/English.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/English.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/English.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/English.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/English.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/English.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/English.pm", {st_mode=S_IFREG|0644, st_size=4488, ...}) = 0 -open("/usr/share/perl/5.10/English.pm", O_RDONLY|O_LARGEFILE) = 4 -ioctl(4, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef7348) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(4, 0, [0], SEEK_CUR) = 0 -read(4, "package English;\n\nour $VERSION = "..., 4096) = 4096 -stat64("/etc/perl/Tie/Hash/NamedCapture.pmc", 0xbfef694c) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/Tie/Hash/NamedCapture.pm", 0xbfef68c4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/Tie/Hash/NamedCapture.pmc", 0xbfef694c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/Tie/Hash/NamedCapture.pm", 0xbfef68c4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/Tie/Hash/NamedCapture.pmc", 0xbfef694c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/Tie/Hash/NamedCapture.pm", 0xbfef68c4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/Tie/Hash/NamedCapture.pmc", 0xbfef694c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/Tie/Hash/NamedCapture.pm", 0xbfef68c4) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/Tie/Hash/NamedCapture.pmc", 0xbfef694c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/Tie/Hash/NamedCapture.pm", 0xbfef68c4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/Tie/Hash/NamedCapture.pmc", 0xbfef694c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/Tie/Hash/NamedCapture.pm", 0xbfef68c4) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/Tie/Hash/NamedCapture.pmc", 0xbfef694c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/Tie/Hash/NamedCapture.pm", {st_mode=S_IFREG|0644, st_size=1861, ...}) = 0 -open("/usr/share/perl/5.10/Tie/Hash/NamedCapture.pm", O_RDONLY|O_LARGEFILE) = 5 -ioctl(5, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef66d8) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(5, 0, [0], SEEK_CUR) = 0 -read(5, "package Tie::Hash::NamedCapture;\n"..., 4096) = 1861 -_llseek(5, 482, [482], SEEK_SET) = 0 -_llseek(5, 0, [482], SEEK_CUR) = 0 -close(5) = 0 -read(4, "ULATOR\t\t\t\t= *^A\t;\n\t*COMPILING\t\t\t\t"..., 4096) = 392 -brk(0x998e000) = 0x998e000 -read(4, ""..., 4096) = 0 -close(4) = 0 -stat64("/etc/perl/POSIX.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/POSIX.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/POSIX.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/POSIX.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/POSIX.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/POSIX.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/POSIX.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/POSIX.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/POSIX.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/POSIX.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/POSIX.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/POSIX.pm", {st_mode=S_IFREG|0644, st_size=2057, ...}) = 0 -open("/usr/lib/perl/5.10/POSIX.pm", O_RDONLY|O_LARGEFILE) = 4 -ioctl(4, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef7348) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(4, 0, [0], SEEK_CUR) = 0 -read(4, "package POSIX;\nuse strict;\nuse wa"..., 4096) = 2057 -stat64("/etc/perl/AutoLoader.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/AutoLoader.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/AutoLoader.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/AutoLoader.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/AutoLoader.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/AutoLoader.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/AutoLoader.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/AutoLoader.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/AutoLoader.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/AutoLoader.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/AutoLoader.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/AutoLoader.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/AutoLoader.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/AutoLoader.pm", {st_mode=S_IFREG|0644, st_size=5638, ...}) = 0 -open("/usr/share/perl/5.10/AutoLoader.pm", O_RDONLY|O_LARGEFILE) = 5 -ioctl(5, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef6eb8) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(5, 0, [0], SEEK_CUR) = 0 -read(5, "package AutoLoader;\n\nuse strict;\n"..., 4096) = 4096 -read(5, "^&?AUTOLOAD$/ ) {\n\t no strict "..., 4096) = 1542 -_llseek(5, 5637, [5637], SEEK_SET) = 0 -_llseek(5, 0, [5637], SEEK_CUR) = 0 -close(5) = 0 -stat64("/usr/lib/perl/5.10/auto/POSIX/autosplit.ix", {st_mode=S_IFREG|0644, st_size=2463, ...}) = 0 -open("/usr/lib/perl/5.10/auto/POSIX/autosplit.ix", O_RDONLY|O_LARGEFILE) = 5 -ioctl(5, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef6eb8) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(5, 0, [0], SEEK_CUR) = 0 -read(5, "# Index created by AutoSplit for "..., 4096) = 2463 -read(5, ""..., 4096) = 0 -close(5) = 0 -stat64("/etc/perl/Fcntl.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/Fcntl.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/Fcntl.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/Fcntl.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/Fcntl.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/Fcntl.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/Fcntl.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/Fcntl.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/Fcntl.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/Fcntl.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/Fcntl.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/Fcntl.pm", {st_mode=S_IFREG|0644, st_size=3557, ...}) = 0 -open("/usr/lib/perl/5.10/Fcntl.pm", O_RDONLY|O_LARGEFILE) = 5 -ioctl(5, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef6eb8) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(5, 0, [0], SEEK_CUR) = 0 -read(5, "package Fcntl;\n\nuse strict;\nour($"..., 4096) = 3557 -stat64("/usr/lib/perl/5.10/auto/Fcntl/Fcntl.so", {st_mode=S_IFREG|0644, st_size=13680, ...}) = 0 -stat64("/usr/lib/perl/5.10/auto/Fcntl/Fcntl.bs", 0x98650c0) = -1 ENOENT (No such file or directory) -open("/usr/lib/perl/5.10/auto/Fcntl/Fcntl.so", O_RDONLY) = 6 -read(6, "\177ELF\1\1\1\0\0\0\0\0\0\0\0\0\3\0\3\0\1\0\0\0\300\17\0\0004\0\0\0`"..., 512) = 512 -fstat64(6, {st_mode=S_IFREG|0644, st_size=13680, ...}) = 0 -mmap2(NULL, 16528, PROT_READ|PROT_EXEC, MAP_PRIVATE|MAP_DENYWRITE, 6, 0) = 0xb7561000 -mmap2(0xb7564000, 8192, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_FIXED|MAP_DENYWRITE, 6, 0x2) = 0xb7564000 -close(6) = 0 -mprotect(0xb7564000, 4096, PROT_READ) = 0 -read(5, ""..., 4096) = 0 -close(5) = 0 -stat64("/etc/perl/Tie/Hash.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/Tie/Hash.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/Tie/Hash.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/Tie/Hash.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/Tie/Hash.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/Tie/Hash.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/Tie/Hash.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/Tie/Hash.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/Tie/Hash.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/Tie/Hash.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/Tie/Hash.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/Tie/Hash.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/Tie/Hash.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/Tie/Hash.pm", {st_mode=S_IFREG|0644, st_size=1722, ...}) = 0 -open("/usr/share/perl/5.10/Tie/Hash.pm", O_RDONLY|O_LARGEFILE) = 5 -ioctl(5, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef6eb8) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(5, 0, [0], SEEK_CUR) = 0 -brk(0x99af000) = 0x99af000 -read(5, "package Tie::Hash;\n\nour $VERSION "..., 4096) = 1722 -read(5, ""..., 4096) = 0 -close(5) = 0 -stat64("/etc/perl/vars.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/vars.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/vars.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/vars.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/vars.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/vars.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/vars.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/vars.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/vars.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/vars.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/vars.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/vars.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/vars.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/vars.pm", {st_mode=S_IFREG|0644, st_size=1149, ...}) = 0 -open("/usr/share/perl/5.10/vars.pm", O_RDONLY|O_LARGEFILE) = 5 -ioctl(5, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef6eb8) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(5, 0, [0], SEEK_CUR) = 0 -read(5, "package vars;\n\nuse 5.006;\n\nour $V"..., 4096) = 1149 -_llseek(5, 1148, [1148], SEEK_SET) = 0 -_llseek(5, 0, [1148], SEEK_CUR) = 0 -close(5) = 0 -read(4, ""..., 4096) = 0 -close(4) = 0 -stat64("/usr/lib/perl/5.10/auto/POSIX/POSIX.so", {st_mode=S_IFREG|0644, st_size=108480, ...}) = 0 -stat64("/usr/lib/perl/5.10/auto/POSIX/POSIX.bs", 0x98650c0) = -1 ENOENT (No such file or directory) -open("/usr/lib/perl/5.10/auto/POSIX/POSIX.so", O_RDONLY) = 4 -read(4, "\177ELF\1\1\1\0\0\0\0\0\0\0\0\0\3\0\3\0\1\0\0\0@Q\0\0004\0\0\0\260"..., 512) = 512 -fstat64(4, {st_mode=S_IFREG|0644, st_size=108480, ...}) = 0 -mmap2(NULL, 111328, PROT_READ|PROT_EXEC, MAP_PRIVATE|MAP_DENYWRITE, 4, 0) = 0xb7545000 -mmap2(0xb755e000, 12288, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_FIXED|MAP_DENYWRITE, 4, 0x18) = 0xb755e000 -close(4) = 0 -mprotect(0xb755e000, 8192, PROT_READ) = 0 -stat64("/usr/lib/perl/5.10/auto/POSIX/load_imports.al", {st_mode=S_IFREG|0644, st_size=6878, ...}) = 0 -getgroups32(0, NULL) = 12 -getgroups32(12, [4, 6, 20, 24, 33, 46, 106, 121, 122, 129, 1000, 1003]) = 12 -open("/usr/share/locale/fr_FR.UTF-8/LC_MESSAGES/libc.mo", O_RDONLY) = -1 ENOENT (No such file or directory) -open("/usr/share/locale/fr_FR.utf8/LC_MESSAGES/libc.mo", O_RDONLY) = -1 ENOENT (No such file or directory) -open("/usr/share/locale/fr_FR/LC_MESSAGES/libc.mo", O_RDONLY) = -1 ENOENT (No such file or directory) -open("/usr/share/locale/fr.UTF-8/LC_MESSAGES/libc.mo", O_RDONLY) = -1 ENOENT (No such file or directory) -open("/usr/share/locale/fr.utf8/LC_MESSAGES/libc.mo", O_RDONLY) = -1 ENOENT (No such file or directory) -open("/usr/share/locale/fr/LC_MESSAGES/libc.mo", O_RDONLY) = -1 ENOENT (No such file or directory) -open("/usr/share/locale-langpack/fr_FR.UTF-8/LC_MESSAGES/libc.mo", O_RDONLY) = -1 ENOENT (No such file or directory) -open("/usr/share/locale-langpack/fr_FR.utf8/LC_MESSAGES/libc.mo", O_RDONLY) = -1 ENOENT (No such file or directory) -open("/usr/share/locale-langpack/fr_FR/LC_MESSAGES/libc.mo", O_RDONLY) = -1 ENOENT (No such file or directory) -open("/usr/share/locale-langpack/fr.UTF-8/LC_MESSAGES/libc.mo", O_RDONLY) = -1 ENOENT (No such file or directory) -open("/usr/share/locale-langpack/fr.utf8/LC_MESSAGES/libc.mo", O_RDONLY) = -1 ENOENT (No such file or directory) -open("/usr/share/locale-langpack/fr/LC_MESSAGES/libc.mo", O_RDONLY) = 4 -fstat64(4, {st_mode=S_IFREG|0644, st_size=137860, ...}) = 0 -mmap2(NULL, 137860, PROT_READ, MAP_PRIVATE, 4, 0) = 0xb7523000 -close(4) = 0 -stat64("/usr/lib/perl/5.10/auto/POSIX/load_imports.al", {st_mode=S_IFREG|0644, st_size=6878, ...}) = 0 -open("/usr/lib/perl/5.10/auto/POSIX/load_imports.al", O_RDONLY|O_LARGEFILE) = 4 -ioctl(4, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef7348) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(4, 0, [0], SEEK_CUR) = 0 -read(4, "# NOTE: Derived from ../../lib/PO"..., 4096) = 4096 -brk(0x99d0000) = 0x99d0000 -read(4, "trspn strstr\n\t\tstrtok strxfrm)],\n"..., 4096) = 2782 -read(4, ""..., 4096) = 0 -close(4) = 0 -stat64("/etc/perl/lib.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/lib.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/lib.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/lib.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/lib.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/lib.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/lib.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/lib.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/lib.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/lib.pm", 0xbfef7534) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/lib.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/lib.pm", {st_mode=S_IFREG|0644, st_size=3111, ...}) = 0 -open("/usr/lib/perl/5.10/lib.pm", O_RDONLY|O_LARGEFILE) = 4 -ioctl(4, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef7348) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(4, 0, [0], SEEK_CUR) = 0 -brk(0x99f1000) = 0x99f1000 -read(4, "package lib;\n\n# THIS FILE IS AUTO"..., 4096) = 3111 -stat64("/etc/perl/Config.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/Config.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/Config.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/Config.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/Config.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/Config.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/Config.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/Config.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/Config.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/Config.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/Config.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/Config.pm", {st_mode=S_IFREG|0644, st_size=2553, ...}) = 0 -open("/usr/lib/perl/5.10/Config.pm", O_RDONLY|O_LARGEFILE) = 5 -ioctl(5, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef6eb8) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(5, 0, [0], SEEK_CUR) = 0 -read(5, "# This file was created by config"..., 4096) = 2553 -read(5, ""..., 4096) = 0 -close(5) = 0 -_llseek(4, 3110, [3110], SEEK_SET) = 0 -_llseek(4, 0, [3110], SEEK_CUR) = 0 -close(4) = 0 -stat64("../Mail-IMAPClient-3.25/lib", {st_mode=S_IFDIR|0755, st_size=4096, ...}) = 0 -stat64("../Mail-IMAPClient-3.25/lib/i486-linux-gnu-thread-multi/auto", 0x98650c0) = -1 ENOENT (No such file or directory) -stat64("../Mail-IMAPClient-3.25/lib/5.10.0", 0x98650c0) = -1 ENOENT (No such file or directory) -stat64("../Mail-IMAPClient-3.25/lib/5.10.0/i486-linux-gnu-thread-multi", 0x98650c0) = -1 ENOENT (No such file or directory) -stat64("../Mail-IMAPClient-3.25/lib/Mail/IMAPClient.pmc", 0xbfef75bc) = -1 ENOENT (No such file or directory) -stat64("../Mail-IMAPClient-3.25/lib/Mail/IMAPClient.pm", {st_mode=S_IFREG|0644, st_size=102353, ...}) = 0 -open("../Mail-IMAPClient-3.25/lib/Mail/IMAPClient.pm", O_RDONLY|O_LARGEFILE) = 4 -ioctl(4, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef7348) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(4, 0, [0], SEEK_CUR) = 0 -read(4, "\n# _{name} methods are undocument"..., 4096) = 4096 -stat64("../Mail-IMAPClient-3.25/lib/Mail/IMAPClient/MessageSet.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("../Mail-IMAPClient-3.25/lib/Mail/IMAPClient/MessageSet.pm", {st_mode=S_IFREG|0444, st_size=9027, ...}) = 0 -open("../Mail-IMAPClient-3.25/lib/Mail/IMAPClient/MessageSet.pm", O_RDONLY|O_LARGEFILE) = 5 -ioctl(5, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef6eb8) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(5, 0, [0], SEEK_CUR) = 0 -read(5, "use warnings;\nuse strict;\n\npackag"..., 4096) = 4096 -stat64("../Mail-IMAPClient-3.25/lib/overload.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("../Mail-IMAPClient-3.25/lib/overload.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/overload.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/overload.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/overload.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/overload.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/overload.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/overload.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/overload.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/overload.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/overload.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/overload.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/overload.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/overload.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/overload.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/overload.pm", {st_mode=S_IFREG|0644, st_size=4355, ...}) = 0 -open("/usr/share/perl/5.10/overload.pm", O_RDONLY|O_LARGEFILE) = 6 -ioctl(6, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef6a28) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(6, 0, [0], SEEK_CUR) = 0 -read(6, "package overload;\n\nour $VERSION ="..., 4096) = 4096 -read(6, " else {\n $^H{$_[0]} = $"..., 4096) = 259 -_llseek(6, 4354, [4354], SEEK_SET) = 0 -_llseek(6, 0, [4354], SEEK_CUR) = 0 -close(6) = 0 -brk(0x9a12000) = 0x9a12000 -read(5, "ll numbered sequentially. Delimit"..., 4096) = 4096 -read(5, "hether it was already like that o"..., 4096) = 835 -read(5, ""..., 4096) = 0 -close(5) = 0 -stat64("../Mail-IMAPClient-3.25/lib/IO/Select.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("../Mail-IMAPClient-3.25/lib/IO/Select.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/IO/Select.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/IO/Select.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/IO/Select.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/IO/Select.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/IO/Select.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/IO/Select.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/IO/Select.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/IO/Select.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/IO/Select.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/IO/Select.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/IO/Select.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/IO/Select.pm", {st_mode=S_IFREG|0644, st_size=4026, ...}) = 0 -open("/usr/lib/perl/5.10/IO/Select.pm", O_RDONLY|O_LARGEFILE) = 5 -ioctl(5, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef6eb8) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(5, 0, [0], SEEK_CUR) = 0 -read(5, "# IO::Select.pm\n#\n# Copyright (c)"..., 4096) = 4026 -_llseek(5, 4025, [4025], SEEK_SET) = 0 -_llseek(5, 0, [4025], SEEK_CUR) = 0 -close(5) = 0 -stat64("../Mail-IMAPClient-3.25/lib/IO/File.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("../Mail-IMAPClient-3.25/lib/IO/File.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/IO/File.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/IO/File.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/IO/File.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/IO/File.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/IO/File.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/IO/File.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/IO/File.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/IO/File.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/IO/File.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/IO/File.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/IO/File.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/IO/File.pm", {st_mode=S_IFREG|0644, st_size=1680, ...}) = 0 -open("/usr/lib/perl/5.10/IO/File.pm", O_RDONLY|O_LARGEFILE) = 5 -ioctl(5, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef6eb8) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(5, 0, [0], SEEK_CUR) = 0 -read(5, "#\n\npackage IO::File;\n\nuse 5.006_0"..., 4096) = 1680 -stat64("../Mail-IMAPClient-3.25/lib/IO/Seekable.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("../Mail-IMAPClient-3.25/lib/IO/Seekable.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/IO/Seekable.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/IO/Seekable.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/IO/Seekable.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/IO/Seekable.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/IO/Seekable.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/IO/Seekable.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/IO/Seekable.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/IO/Seekable.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/IO/Seekable.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/IO/Seekable.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/IO/Seekable.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/IO/Seekable.pm", {st_mode=S_IFREG|0644, st_size=686, ...}) = 0 -open("/usr/lib/perl/5.10/IO/Seekable.pm", O_RDONLY|O_LARGEFILE) = 6 -ioctl(6, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef6a28) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(6, 0, [0], SEEK_CUR) = 0 -read(6, "#\n\npackage IO::Seekable;\n\nuse 5.0"..., 4096) = 686 -read(6, ""..., 4096) = 0 -close(6) = 0 -stat64("../Mail-IMAPClient-3.25/lib/File/Spec.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("../Mail-IMAPClient-3.25/lib/File/Spec.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/File/Spec.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/File/Spec.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/File/Spec.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/File/Spec.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/File/Spec.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/File/Spec.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/File/Spec.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/File/Spec.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/File/Spec.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/File/Spec.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/File/Spec.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/File/Spec.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/File/Spec.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/File/Spec.pm", {st_mode=S_IFREG|0644, st_size=597, ...}) = 0 -open("/usr/share/perl/5.10/File/Spec.pm", O_RDONLY|O_LARGEFILE) = 6 -ioctl(6, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef6a28) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(6, 0, [0], SEEK_CUR) = 0 -read(6, "package File::Spec;\n\nuse strict;\n"..., 4096) = 597 -_llseek(6, 596, [596], SEEK_SET) = 0 -_llseek(6, 0, [596], SEEK_CUR) = 0 -close(6) = 0 -stat64("../Mail-IMAPClient-3.25/lib/File/Spec/Unix.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("../Mail-IMAPClient-3.25/lib/File/Spec/Unix.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/File/Spec/Unix.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/File/Spec/Unix.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/File/Spec/Unix.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/File/Spec/Unix.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/File/Spec/Unix.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/File/Spec/Unix.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/File/Spec/Unix.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/File/Spec/Unix.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/File/Spec/Unix.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/File/Spec/Unix.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/File/Spec/Unix.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/File/Spec/Unix.pm", 0xbfef6c14) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/File/Spec/Unix.pmc", 0xbfef6c9c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/File/Spec/Unix.pm", {st_mode=S_IFREG|0644, st_size=7428, ...}) = 0 -open("/usr/share/perl/5.10/File/Spec/Unix.pm", O_RDONLY|O_LARGEFILE) = 6 -ioctl(6, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef6a28) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(6, 0, [0], SEEK_CUR) = 0 -read(6, "package File::Spec::Unix;\n\nuse st"..., 4096) = 4096 -brk(0x9a33000) = 0x9a33000 -read(6, "volume) = $self->splitpath($base,"..., 4096) = 3332 -read(6, ""..., 4096) = 0 -close(6) = 0 -read(5, ""..., 4096) = 0 -close(5) = 0 -stat64("../Mail-IMAPClient-3.25/lib/List/Util.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("../Mail-IMAPClient-3.25/lib/List/Util.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/List/Util.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/List/Util.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/List/Util.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/List/Util.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/List/Util.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/List/Util.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/List/Util.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/List/Util.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/List/Util.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/List/Util.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/List/Util.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/List/Util.pm", {st_mode=S_IFREG|0644, st_size=1910, ...}) = 0 -open("/usr/lib/perl/5.10/List/Util.pm", O_RDONLY|O_LARGEFILE) = 5 -ioctl(5, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef6eb8) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(5, 0, [0], SEEK_CUR) = 0 -read(5, "# List::Util.pm\n#\n# Copyright (c)"..., 4096) = 1910 -_llseek(5, 1909, [1909], SEEK_SET) = 0 -_llseek(5, 0, [1909], SEEK_CUR) = 0 -close(5) = 0 -stat64("/usr/lib/perl/5.10/auto/List/Util/Util.so", {st_mode=S_IFREG|0644, st_size=34316, ...}) = 0 -stat64("/usr/lib/perl/5.10/auto/List/Util/Util.bs", 0x98650c0) = -1 ENOENT (No such file or directory) -open("/usr/lib/perl/5.10/auto/List/Util/Util.so", O_RDONLY) = 5 -read(5, "\177ELF\1\1\1\0\0\0\0\0\0\0\0\0\3\0\3\0\1\0\0\0P\35\0\0004\0\0\0$"..., 512) = 512 -fstat64(5, {st_mode=S_IFREG|0644, st_size=34316, ...}) = 0 -mmap2(NULL, 37220, PROT_READ|PROT_EXEC, MAP_PRIVATE|MAP_DENYWRITE, 5, 0) = 0xb7519000 -mmap2(0xb7521000, 8192, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_FIXED|MAP_DENYWRITE, 5, 0x7) = 0xb7521000 -close(5) = 0 -mprotect(0xb7521000, 4096, PROT_READ) = 0 -stat64("../Mail-IMAPClient-3.25/lib/MIME/Base64.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("../Mail-IMAPClient-3.25/lib/MIME/Base64.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/MIME/Base64.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/MIME/Base64.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/MIME/Base64.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/MIME/Base64.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/MIME/Base64.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/MIME/Base64.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/MIME/Base64.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/MIME/Base64.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/MIME/Base64.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/MIME/Base64.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/MIME/Base64.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/MIME/Base64.pm", {st_mode=S_IFREG|0644, st_size=4911, ...}) = 0 -open("/usr/lib/perl/5.10/MIME/Base64.pm", O_RDONLY|O_LARGEFILE) = 5 -ioctl(5, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef6eb8) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(5, 0, [0], SEEK_CUR) = 0 -read(5, "package MIME::Base64;\n\n# $Id: Bas"..., 4096) = 4096 -_llseek(5, 363, [363], SEEK_SET) = 0 -_llseek(5, 0, [363], SEEK_CUR) = 0 -close(5) = 0 -stat64("/usr/lib/perl/5.10/auto/MIME/Base64/Base64.so", {st_mode=S_IFREG|0644, st_size=13620, ...}) = 0 -stat64("/usr/lib/perl/5.10/auto/MIME/Base64/Base64.bs", 0x98650c0) = -1 ENOENT (No such file or directory) -open("/usr/lib/perl/5.10/auto/MIME/Base64/Base64.so", O_RDONLY) = 5 -read(5, "\177ELF\1\1\1\0\0\0\0\0\0\0\0\0\3\0\3\0\1\0\0\0\360\v\0\0004\0\0\0L"..., 512) = 512 -fstat64(5, {st_mode=S_IFREG|0644, st_size=13620, ...}) = 0 -mmap2(NULL, 16520, PROT_READ|PROT_EXEC, MAP_PRIVATE|MAP_DENYWRITE, 5, 0) = 0xb7514000 -mmap2(0xb7517000, 8192, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_FIXED|MAP_DENYWRITE, 5, 0x2) = 0xb7517000 -close(5) = 0 -mprotect(0xb7517000, 4096, PROT_READ) = 0 -stat64("../Mail-IMAPClient-3.25/lib/constant.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("../Mail-IMAPClient-3.25/lib/constant.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/constant.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/constant.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/constant.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/constant.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/constant.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/constant.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/constant.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/constant.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/constant.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/constant.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/constant.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/constant.pm", 0xbfef70a4) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/constant.pmc", 0xbfef712c) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/constant.pm", {st_mode=S_IFREG|0644, st_size=3586, ...}) = 0 -open("/usr/share/perl/5.10/constant.pm", O_RDONLY|O_LARGEFILE) = 5 -ioctl(5, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef6eb8) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(5, 0, [0], SEEK_CUR) = 0 -read(5, "package constant;\nuse 5.005;\nuse "..., 4096) = 3586 -_llseek(5, 3585, [3585], SEEK_SET) = 0 -_llseek(5, 0, [3585], SEEK_CUR) = 0 -close(5) = 0 -read(4, "$fcntl;\n $newflags |= O_NONBLO"..., 4096) = 4096 -brk(0x9a54000) = 0x9a54000 -read(4, "? $self->connect : $self;\n}\n\nsub "..., 4096) = 4096 -read(4, " $self;\n}\n\nsub noop {\n my ( $"..., 4096) = 4096 -read(4, "} = \\@folders unless $what;\n r"..., 4096) = 4096 -brk(0x9a75000) = 0x9a75000 -read(4, "ypart_string {\n my ( $self, $m"..., 4096) = 4096 -read(4, " # If msg size is less tha"..., 4096) = 4096 -read(4, "nless ( $self->_send_line($newstr"..., 4096) = 4096 -brk(0x9a96000) = 0x9a96000 -read(4, "g> OK [APPENDUID ] AP"..., 4096) = 4096 -read(4, "}\n } while $ret > 0;\n\n # se"..., 4096) = 4096 -read(4, " $self->Count( $self->Count + 1 )"..., 4096) = 4096 -brk(0x9ab7000) = 0x9ab7000 -read(4, "ount, $array ) = @_;\n if ( $ar"..., 4096) = 4096 -read(4, "\\$iBuffer, $readlen, length $iBuf"..., 4096) = 4096 -read(4, " # EOF: note IO::Soc"..., 4096) = 4096 -read(4, "trans ) = @_;\n my @a = $self->"..., 4096) = 4096 -brk(0x9ad8000) = 0x9ad8000 -read(4, "tput=$output\");\n }\n "..., 4096) = 4096 -read(4, "$uids = ref $_[-1] ? pop @_ : {}"..., 4096) = 4096 -read(4, "return wantarray ? $self->History"..., 4096) = 4096 -brk(0x9af9000) = 0x9af9000 -read(4, "fetch($string) or return undef;\n "..., 4096) = 4096 -read(4, " + 1900 );\n }\n else {\n "..., 4096) = 4096 -read(4, "} $self->History;\n defined $vl"..., 4096) = 4096 -brk(0x9b1a000) = 0x9b1a000 -read(4, " ? join( $CRLF, @_ ) : shift;\n\n "..., 4096) = 4096 -read(4, "savebuff : \"\";\n $buflen = "..., 4096) = 4096 -read(4, "herwise \" (OK|BAD|NO)\"\n u"..., 4096) = 4096 -brk(0x9b3b000) = 0x9b3b000 -read(4, ">LastError ) {\n my $info ="..., 4096) = 4049 -read(4, ""..., 4096) = 0 -close(4) = 0 -read(3, ""..., 4096) = 0 -close(3) = 0 -write(2, "Connecting via IO::Socket::INET t"..., 61Connecting via IO::Socket::INET to localhost:143 Timeout 600 -) = 61 -open("/etc/resolv.conf", O_RDONLY) = 3 -fstat64(3, {st_mode=S_IFREG|0644, st_size=52, ...}) = 0 -mmap2(NULL, 4096, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0) = 0xb7876000 -read(3, "# Generated by NetworkManager\n#na"..., 4096) = 52 -read(3, ""..., 4096) = 0 -close(3) = 0 -munmap(0xb7876000, 4096) = 0 -uname({sys="Linux", node="petite", ...}) = 0 -stat64("/etc/resolv.conf", {st_mode=S_IFREG|0644, st_size=52, ...}) = 0 -open("/etc/resolv.conf", O_RDONLY) = 3 -fstat64(3, {st_mode=S_IFREG|0644, st_size=52, ...}) = 0 -mmap2(NULL, 4096, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0) = 0xb7876000 -read(3, "# Generated by NetworkManager\n#na"..., 4096) = 52 -read(3, ""..., 4096) = 0 -close(3) = 0 -munmap(0xb7876000, 4096) = 0 -uname({sys="Linux", node="petite", ...}) = 0 -socket(PF_FILE, 0x80801 /* SOCK_??? */, 0) = 3 -connect(3, {sa_family=AF_FILE, path="/var/run/nscd/socket"...}, 110) = -1 ENOENT (No such file or directory) -close(3) = 0 -socket(PF_FILE, 0x80801 /* SOCK_??? */, 0) = 3 -connect(3, {sa_family=AF_FILE, path="/var/run/nscd/socket"...}, 110) = -1 ENOENT (No such file or directory) -close(3) = 0 -open("/etc/nsswitch.conf", O_RDONLY) = 3 -fstat64(3, {st_mode=S_IFREG|0644, st_size=513, ...}) = 0 -mmap2(NULL, 4096, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0) = 0xb7876000 -read(3, "# /etc/nsswitch.conf\n#\n# Example "..., 4096) = 513 -read(3, ""..., 4096) = 0 -close(3) = 0 -munmap(0xb7876000, 4096) = 0 -open("/etc/ld.so.cache", O_RDONLY) = 3 -fstat64(3, {st_mode=S_IFREG|0644, st_size=70776, ...}) = 0 -mmap2(NULL, 70776, PROT_READ, MAP_PRIVATE, 3, 0) = 0xb7502000 -close(3) = 0 -access("/etc/ld.so.nohwcap", F_OK) = -1 ENOENT (No such file or directory) -open("/lib/tls/i686/cmov/libnss_files.so.2", O_RDONLY) = 3 -read(3, "\177ELF\1\1\1\0\0\0\0\0\0\0\0\0\3\0\3\0\1\0\0\0\20\31\0\0004\0\0\0\250"..., 512) = 512 -fstat64(3, {st_mode=S_IFREG|0644, st_size=42504, ...}) = 0 -mmap2(NULL, 45720, PROT_READ|PROT_EXEC, MAP_PRIVATE|MAP_DENYWRITE, 3, 0) = 0xb74f6000 -mmap2(0xb7500000, 8192, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_FIXED|MAP_DENYWRITE, 3, 0x9) = 0xb7500000 -close(3) = 0 -mprotect(0xb7500000, 4096, PROT_READ) = 0 -munmap(0xb7502000, 70776) = 0 -open("/etc/host.conf", O_RDONLY) = 3 -fstat64(3, {st_mode=S_IFREG|0644, st_size=92, ...}) = 0 -mmap2(NULL, 4096, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0) = 0xb7876000 -read(3, "# The \"order\" line is only used b"..., 4096) = 92 -read(3, ""..., 4096) = 0 -close(3) = 0 -munmap(0xb7876000, 4096) = 0 -futex(0xb7830844, FUTEX_WAKE_PRIVATE, 2147483647) = 0 -open("/etc/hosts", O_RDONLY|O_CLOEXEC) = 3 -fcntl64(3, F_GETFD) = 0x1 (flags FD_CLOEXEC) -fstat64(3, {st_mode=S_IFREG|0644, st_size=519, ...}) = 0 -mmap2(NULL, 4096, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0) = 0xb7876000 -read(3, "127.0.0.1\tpetite.lamiral.info pet"..., 4096) = 519 -read(3, ""..., 4096) = 0 -close(3) = 0 -munmap(0xb7876000, 4096) = 0 -socket(PF_INET, SOCK_STREAM, IPPROTO_TCP) = 3 -ioctl(3, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef7908) = -1 EINVAL (Invalid argument) -_llseek(3, 0, 0xbfef7950, SEEK_CUR) = -1 ESPIPE (Illegal seek) -ioctl(3, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef7908) = -1 EINVAL (Invalid argument) -_llseek(3, 0, 0xbfef7950, SEEK_CUR) = -1 ESPIPE (Illegal seek) -fcntl64(3, F_SETFD, FD_CLOEXEC) = 0 -fcntl64(3, F_GETFL) = 0x2 (flags O_RDWR) -fcntl64(3, F_SETFL, O_RDWR|O_NONBLOCK) = 0 -connect(3, {sa_family=AF_INET, sin_port=htons(143), sin_addr=inet_addr("127.0.0.1")}, 16) = -1 EINPROGRESS (Operation now in progress) -select(8, NULL, [3], NULL, {600, 0}) = 1 (out [3], left {599, 999988}) -connect(3, {sa_family=AF_INET, sin_port=htons(143), sin_addr=inet_addr("127.0.0.1")}, 16) = 0 -fcntl64(3, F_GETFL) = 0x802 (flags O_RDWR|O_NONBLOCK) -fcntl64(3, F_SETFL, O_RDWR) = 0 -write(2, "Connected to localhost\n"..., 23Connected to localhost -) = 23 -fcntl64(3, F_GETFL) = 0x2 (flags O_RDWR) -fcntl64(3, F_SETFL, O_RDWR|O_NONBLOCK) = 0 -select(8, [3], NULL, [3], {600, 0}) = 1 (left {599, 999513}) -read(3, "* OK [CAPABILITY IMAP4rev1 UIDPLU"..., 4096) = 242 -write(2, "Read: \t* OK [CAPABILITY IMAP4rev1"..., 248Read: * OK [CAPABILITY IMAP4rev1 UIDPLUS CHILDREN NAMESPACE THREAD=ORDEREDSUBJECT THREAD=REFERENCES SORT QUOTA IDLE ACL ACL2=UNION STARTTLS] Courier-IMAP ready. Copyright 1998-2008 Double Precision, Inc. See COPYING for distribution information. -) = 248 -write(2, "Sending: 1 LOGOUT\n"..., 18Sending: 1 LOGOUT -) = 18 -rt_sigaction(SIGPIPE, NULL, {SIG_DFL}, 8) = 0 -rt_sigprocmask(SIG_BLOCK, [PIPE], [], 8) = 0 -rt_sigaction(SIGPIPE, {SIG_DFL}, {SIG_DFL}, 8) = 0 -rt_sigprocmask(SIG_SETMASK, [], NULL, 8) = 0 -rt_sigprocmask(SIG_BLOCK, [PIPE], [], 8) = 0 -rt_sigaction(SIGPIPE, {SIG_IGN}, {SIG_DFL}, 8) = 0 -rt_sigprocmask(SIG_SETMASK, [], NULL, 8) = 0 -write(3, "1 LOGOUT\r\n"..., 10) = 10 -write(2, "Sent 10 bytes\n"..., 14Sent 10 bytes -) = 14 -rt_sigprocmask(SIG_BLOCK, [PIPE], [], 8) = 0 -rt_sigaction(SIGPIPE, {SIG_DFL}, {SIG_IGN}, 8) = 0 -rt_sigprocmask(SIG_SETMASK, [], NULL, 8) = 0 -select(8, [3], NULL, [3], {600, 0}) = 1 (left {599, 999988}) -read(3, "* BYE Courier-IMAP server shuttin"..., 4096) = 64 -write(2, "Read: \t* BYE Courier-IMAP server "..., 72Read: * BYE Courier-IMAP server shutting down - 1 OK LOGOUT completed -) = 72 -close(3) = 0 -stat64("../Mail-IMAPClient-3.25/lib/auto/POSIX/SigAction/new.al", 0xbfef7964) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/auto/POSIX/SigAction/new.al", 0xbfef7964) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/auto/POSIX/SigAction/new.al", 0xbfef7964) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/auto/POSIX/SigAction/new.al", 0xbfef7964) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/auto/POSIX/SigAction/new.al", 0xbfef7964) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/auto/POSIX/SigAction/new.al", 0xbfef7964) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/auto/POSIX/SigAction/new.al", {st_mode=S_IFREG|0644, st_size=388, ...}) = 0 -open("/usr/lib/perl/5.10/auto/POSIX/SigAction/new.al", O_RDONLY|O_LARGEFILE) = 3 -ioctl(3, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef7778) = -1 ENOTTY (Inappropriate ioctl for device) -_llseek(3, 0, [0], SEEK_CUR) = 0 -read(3, "# NOTE: Derived from ../../lib/PO"..., 4096) = 388 -brk(0x9b5c000) = 0x9b5c000 -read(3, ""..., 4096) = 0 -close(3) = 0 -rt_sigprocmask(SIG_BLOCK, ~[RTMIN RT_1], [], 8) = 0 -rt_sigprocmask(SIG_BLOCK, [ALRM], ~[KILL STOP RTMIN RT_1], 8) = 0 -rt_sigaction(SIGALRM, {0x809aa00, [], 0}, {SIG_DFL}, 8) = 0 -rt_sigprocmask(SIG_SETMASK, ~[KILL STOP RTMIN RT_1], NULL, 8) = 0 -rt_sigaction(SIGALRM, {0x809a220, [], 0}, NULL, 8) = 0 -rt_sigprocmask(SIG_SETMASK, [], NULL, 8) = 0 -stat64("../Mail-IMAPClient-3.25/lib/auto/POSIX/SigAction/DESTROY.al", 0xbfef7744) = -1 ENOENT (No such file or directory) -stat64("/etc/perl/auto/POSIX/SigAction/DESTROY.al", 0xbfef7744) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/perl/5.10.0/auto/POSIX/SigAction/DESTROY.al", 0xbfef7744) = -1 ENOENT (No such file or directory) -stat64("/usr/local/share/perl/5.10.0/auto/POSIX/SigAction/DESTROY.al", 0xbfef7744) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl5/auto/POSIX/SigAction/DESTROY.al", 0xbfef7744) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl5/auto/POSIX/SigAction/DESTROY.al", 0xbfef7744) = -1 ENOENT (No such file or directory) -stat64("/usr/lib/perl/5.10/auto/POSIX/SigAction/DESTROY.al", 0xbfef7744) = -1 ENOENT (No such file or directory) -stat64("/usr/share/perl/5.10/auto/POSIX/SigAction/DESTROY.al", 0xbfef7744) = -1 ENOENT (No such file or directory) -stat64("/usr/local/lib/site_perl/auto/POSIX/SigAction/DESTROY.al", 0xbfef7744) = -1 ENOENT (No such file or directory) -stat64("./auto/POSIX/SigAction/DESTROY.al", 0xbfef7744) = -1 ENOENT (No such file or directory) -alarm(3) = 0 -socket(PF_INET, SOCK_STREAM, IPPROTO_TCP) = 3 -ioctl(3, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef7908) = -1 EINVAL (Invalid argument) -_llseek(3, 0, 0xbfef7950, SEEK_CUR) = -1 ESPIPE (Illegal seek) -ioctl(3, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef7908) = -1 EINVAL (Invalid argument) -_llseek(3, 0, 0xbfef7950, SEEK_CUR) = -1 ESPIPE (Illegal seek) -fcntl64(3, F_SETFD, FD_CLOEXEC) = 0 -connect(3, {sa_family=AF_INET, sin_port=htons(80), sin_addr=inet_addr("10.10.10.10")}, 16) = -1 EHOSTUNREACH (No route to host) -close(3) = 0 -alarm(0) = 1 -write(2, "Connecting via IO::Socket::INET t"..., 61Connecting via IO::Socket::INET to localhost:143 Timeout 600 -) = 61 -stat64("/etc/resolv.conf", {st_mode=S_IFREG|0644, st_size=52, ...}) = 0 -stat64("/etc/resolv.conf", {st_mode=S_IFREG|0644, st_size=52, ...}) = 0 -open("/etc/hosts", O_RDONLY|O_CLOEXEC) = 3 -fstat64(3, {st_mode=S_IFREG|0644, st_size=519, ...}) = 0 -mmap2(NULL, 4096, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0) = 0xb7876000 -read(3, "127.0.0.1\tpetite.lamiral.info pet"..., 4096) = 519 -read(3, ""..., 4096) = 0 -close(3) = 0 -munmap(0xb7876000, 4096) = 0 -socket(PF_INET, SOCK_STREAM, IPPROTO_TCP) = 3 -ioctl(3, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef7908) = -1 EINVAL (Invalid argument) -_llseek(3, 0, 0xbfef7950, SEEK_CUR) = -1 ESPIPE (Illegal seek) -ioctl(3, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfef7908) = -1 EINVAL (Invalid argument) -_llseek(3, 0, 0xbfef7950, SEEK_CUR) = -1 ESPIPE (Illegal seek) -fcntl64(3, F_SETFD, FD_CLOEXEC) = 0 -fcntl64(3, F_GETFL) = 0x2 (flags O_RDWR) -fcntl64(3, F_SETFL, O_RDWR|O_NONBLOCK) = 0 -connect(3, {sa_family=AF_INET, sin_port=htons(143), sin_addr=inet_addr("127.0.0.1")}, 16) = -1 EINPROGRESS (Operation now in progress) -select(8, NULL, [3], NULL, {600, 0}) = 1 (out [3], left {599, 999985}) -connect(3, {sa_family=AF_INET, sin_port=htons(143), sin_addr=inet_addr("127.0.0.1")}, 16) = 0 -fcntl64(3, F_GETFL) = 0x802 (flags O_RDWR|O_NONBLOCK) -fcntl64(3, F_SETFL, O_RDWR) = 0 -write(2, "Connected to localhost\n"..., 23Connected to localhost -) = 23 -fcntl64(3, F_GETFL) = 0x2 (flags O_RDWR) -fcntl64(3, F_SETFL, O_RDWR|O_NONBLOCK) = 0 -select(8, [3], NULL, [3], {600, 0}) = 1 (left {599, 999989}) -read(3, "* OK [CAPABILITY IMAP4rev1 UIDPLU"..., 4096) = 242 -write(2, "Read: \t* OK [CAPABILITY IMAP4rev1"..., 248Read: * OK [CAPABILITY IMAP4rev1 UIDPLUS CHILDREN NAMESPACE THREAD=ORDEREDSUBJECT THREAD=REFERENCES SORT QUOTA IDLE ACL ACL2=UNION STARTTLS] Courier-IMAP ready. Copyright 1998-2008 Double Precision, Inc. See COPYING for distribution information. -) = 248 -write(2, "Sending: 1 LOGOUT\n"..., 18Sending: 1 LOGOUT -) = 18 -rt_sigprocmask(SIG_BLOCK, [PIPE], [], 8) = 0 -rt_sigaction(SIGPIPE, {SIG_DFL}, {SIG_DFL}, 8) = 0 -rt_sigprocmask(SIG_SETMASK, [], NULL, 8) = 0 -rt_sigprocmask(SIG_BLOCK, [PIPE], [], 8) = 0 -rt_sigaction(SIGPIPE, {SIG_IGN}, {SIG_DFL}, 8) = 0 -rt_sigprocmask(SIG_SETMASK, [], NULL, 8) = 0 -write(3, "1 LOGOUT\r\n"..., 10) = 10 -write(2, "Sent 10 bytes\n"..., 14Sent 10 bytes -) = 14 -rt_sigprocmask(SIG_BLOCK, [PIPE], [], 8) = 0 -rt_sigaction(SIGPIPE, {SIG_DFL}, {SIG_IGN}, 8) = 0 -rt_sigprocmask(SIG_SETMASK, [], NULL, 8) = 0 -select(8, [3], NULL, [3], {600, 0}) = 1 (left {599, 999161}) -read(3, "* BYE Courier-IMAP server shuttin"..., 4096) = 64 -write(2, "Read: \t* BYE Courier-IMAP server "..., 72Read: * BYE Courier-IMAP server shutting down - 1 OK LOGOUT completed -) = 72 -close(3) = 0 -write(1, "last_release 10.10.10.10\nunknown\n"..., 33last_release 10.10.10.10 -unknown -) = 33 -exit_group(0) = ? diff --git a/tests.sh b/tests.sh index 9f9ae88..1f6aa50 100644 --- a/tests.sh +++ b/tests.sh @@ -1,6 +1,6 @@ #!/bin/sh -# $Id: tests.sh,v 1.183 2011/11/17 22:13:27 gilles Exp gilles $ +# $Id: tests.sh,v 1.186 2011/12/10 01:37:20 gilles Exp gilles $ # Example 1: # CMD_PERL='perl -I./Mail-IMAPClient-3.25/lib' sh -x tests.sh @@ -325,7 +325,7 @@ ll_noheader() { --passfile1 ../../var/pass/secret.tata \ --host2 $HOST2 --user2 titi \ --passfile2 ../../var/pass/secret.titi \ - --folder INBOX.few_emails --useheader '' + --folder INBOX.few_emails --useheader '' --debug } ll_noheader_force() { @@ -339,6 +339,15 @@ ll_noheader_force() { --skipheader 'Message-Id|Date' } +ll_addheader() { + $CMD_PERL ./imapsync \ + --host1 $HOST1 --user1 tata \ + --passfile1 ../../var/pass/secret.tata \ + --host2 $HOST2 --user2 titi \ + --passfile2 ../../var/pass/secret.titi \ + --folder INBOX.addheader --delete2 --expunge2 --addheader +} + ll_usecachemaxage() { @@ -1083,8 +1092,8 @@ ll_regextrans2_subfolder() --justfolders \ --nofoldersize \ --folder 'INBOX.yop.yap' \ - --regextrans2 's,${h1_prefix}(.*),${h2_prefix}FOO${h2_sep}$1,' --dry - + --prefix1 'INBOX.yop.' \ + --regextrans2 's,^${h2_prefix}(.*),${h2_prefix}FOO${h2_sep}$1,' --dry } @@ -1162,6 +1171,20 @@ ll_useheader() echo 'rm /home/vmail/titi/.yop.yap/cur/*' } + +ll_useheader_Received() +{ + $CMD_PERL ./imapsync \ + --host1 $HOST1 --user1 tata \ + --passfile1 ../../var/pass/secret.tata \ + --host2 $HOST2 --user2 titi \ + --passfile2 ../../var/pass/secret.titi \ + --folder INBOX.yop.yap \ + --useheader 'Received' \ + --dry --debug --fast + echo 'rm /home/vmail/titi/.yop.yap/cur/*' +} + ll_useheader_noheader() { $CMD_PERL ./imapsync \ @@ -2258,7 +2281,13 @@ exchange_1() { --passfile1 ../../var/pass/secret.tata \ --host2 mail.ethz.ch --ssl2 --user2 glamiral \ --passfile2 ../../var/pass/secret.ethz.ch \ - --folder INBOX.oneemail --folder INBOX.few_emails --folder INBOX -maxage 1 + --folder INBOX.few_emails \ + --debugflags \ + --useheader 'MESSAGE-ID' --delete2 --expunge2 \ + --nofilterflags \ + + #--regexflag 's/\$\w+//g' + #-maxage 1 } exchange_2() { @@ -2279,6 +2308,25 @@ exchange_3_delete2() { --folder INBOX.Junk --useuid --delete2 } + +exchange_4_useheader_Received() { + $CMD_PERL ./imapsync \ + --host1 $HOST1 --user1 tata \ + --passfile1 ../../var/pass/secret.tata \ + --host2 mail.ethz.ch --ssl2 --user2 glamiral \ + --passfile2 ../../var/pass/secret.ethz.ch \ + --folder INBOX.yop.yap \ + --delete2 --expunge2 \ + --useheader 'Received' + + +# --useheader 'Received' + + #--regexflag 's/\$\w+//g' + #-maxage 1 +} + + jong_1() { $CMD_PERL ./imapsync \ --host1 mail.y-publicaties.nl --user1 gillesl --passfile1 ../../var/pass/secret.jong \