diff options
author | Christian Belisle <cbelisle@mandriva.com> | 2001-11-13 21:22:26 +0000 |
---|---|---|
committer | Christian Belisle <cbelisle@mandriva.com> | 2001-11-13 21:22:26 +0000 |
commit | f6bcf19db2953be0befc0086abad1e45e40ab655 (patch) | |
tree | 68c4f74901ab1d786e1176270bef120a19f05cf5 /transfugmail.pm | |
parent | 199309afb2499789060c31b146dc7fe7b1f47438 (diff) | |
download | transfugdrake-f6bcf19db2953be0befc0086abad1e45e40ab655.tar transfugdrake-f6bcf19db2953be0befc0086abad1e45e40ab655.tar.gz transfugdrake-f6bcf19db2953be0befc0086abad1e45e40ab655.tar.bz2 transfugdrake-f6bcf19db2953be0befc0086abad1e45e40ab655.tar.xz transfugdrake-f6bcf19db2953be0befc0086abad1e45e40ab655.zip |
Added comments to design the code
Diffstat (limited to 'transfugmail.pm')
-rw-r--r-- | transfugmail.pm | 23 |
1 files changed, 19 insertions, 4 deletions
diff --git a/transfugmail.pm b/transfugmail.pm index 35b658b..562b55b 100644 --- a/transfugmail.pm +++ b/transfugmail.pm @@ -4,10 +4,13 @@ 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"; + $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"; + + # Have to find a way to search for all the inboxes and the programs. + # Return a vector table with all the information. } ######################################## @@ -16,6 +19,9 @@ sub transfug_locate_mail { package OE_5; sub transfug_read_oe_5 { + # Open OE5 Inbox + # Read it + # Store it in a file } ######################################### @@ -24,6 +30,9 @@ sub transfug_read_oe_5 { package OE_4; sub transfug_read_oe_4 { + # Open OE4 Inbox + # Read it + # Store it in a file } ######################################### @@ -32,6 +41,9 @@ sub transfug_read_oe_4 { package Net_4; sub transfug_read_net_4 { + # Open Netscape 4 Inbox + # Read it + # Store it in a file } ######################################### @@ -40,6 +52,9 @@ sub transfug_read_net_4 { package Eudora; sub transfug_read_eudora { + # Open Eudora Inbox + # Read it + # Store it in a file } return 1; |