Select Code to Download

Constant subroutine emptyenum redefined
at C:/Perl/site/lib/Win32/OLE/Const.pm line -1.

use Win32::Shortcut;
use Win32::OLE qw(in with);
...

# The above is my kiddy-scripted version of some VisualBasic that I
# came upon:  Selection.Delete Unit:=wdCharacter, Count:=1

    ws::BEGIN() called at C:/Perl/site/lib/Win32/OLE/Const.pm line 120

    use strict;
    use warnings;
    use Win32::OLE;
    use Win32::OLE::Const 'Microsoft Outlook';

    email_out::BEGIN() called at out_subs.pl line 1027