diff options
-rw-r--r-- | transfugmail.pm | 35 |
1 files changed, 33 insertions, 2 deletions
diff --git a/transfugmail.pm b/transfugmail.pm index 116622e..35b658b 100644 --- a/transfugmail.pm +++ b/transfugmail.pm @@ -1,14 +1,45 @@ +######################################## +# General transfugdrake functions +######################################## +package Transfug; + +sub transfug_locate_mail { + $netscape_4_inbox = "X:\\\\Program Files\\Netscape\\users\\*\\Mail"; + $outlook_4_inbox = "X:\\\\Windows\\Application Data\\Identities\\*\\Microsoft\\Outlook Express\\Inbox.mbx"; + $outlook_5_inbox = "X:\\\\Windows\\Application Data\\Identities\\*\\Microsoft\\Outlook Express\\Inbox.dbx"; + $eudora_inbox = "X:\\\\path\\to\\eudora\\inbox"; +} + +######################################## +# Outlook Express 5 functions +######################################## +package OE_5; + sub transfug_read_oe_5 { } +######################################### +# Outlook Express 4 functions +######################################### +package OE_4; + sub transfug_read_oe_4 { } +######################################### +# Netscape 4 functions +######################################### +package Net_4; + sub transfug_read_net_4 { } +######################################### +# Eudora functions +######################################### +package Eudora; + sub transfug_read_eudora { } -sub transfug_locate_mail { -} +return 1; |