#!/usr/bin/eperl
# Copyright 1999-2012. Parallels IP Holdings GmbH. All Rights Reserved.
#
# Convert mail content of given mailbox from PPCPL storage format (mailbox for inbox folder
# and native IMAP for other folders) into maildir format (native for Plesk) and store it
# into temporary directory

# Modules search order is:
# 1) Modules from shared_legacy in the current directory
# 2) Modules from the current directory
# 3) Modules from shared
use lib '.';
use lib 'shared_legacy';

use MailDumper;

MailDumper::convertMail($ARGV[0], $ARGV[1], $ARGV[2]);