use Perl

• Maybe I'm Spoiled (Score:2)

  by Mr. Muskrat (4572)

  Maybe I'm expecting too much from software that has been around as long as Outlook. Maybe I'm spoiled after using Linux for as long as I have (I've been using it since about 1998 even though I maintained a Windows system for gaming until recent). Things that I take for granted on a Linux system just don't work that way on Windows. Apparently email is one of those things.
  • Re: (Score:2)

    by barbie (2653)

    Take a look at my Mail-Outlook [perl.org] distribution. Although it's not a solution for your immediate problem, it might give you a start for writing something of your own. Personally I would write a rule in Outlook to refile the incoming messages into a dedicated email folder and then have a script poll that folder every $interval minutes. You can set mail items as read/unread through the API. That's how I used to run the CPAN Testing on my Windows box :)
    • Re: (Score:2)

      by Mr. Muskrat (4572)

      Those messages are already going to a personal folder.

      I ran across Mail::Outlook in my searches and made a note to check it out. Now that you have said that I might want to look at how you did it, I'll put it at the top of my list of things to check out.

      Thanks Barbie!
    • UnRead isn't read/write? (Score:2)

      by Mr. Muskrat (4572)

      Any idea on how to mark items as read from Perl? I'm attempting to use the (supposedly) read/write boolean property UnRead but it's giving me "Can't modify non-lvalue subroutine call at outlook.pl line 69."

      #!/usr/bin/perl
      # This started as Shawn A. Clifford's Win32_Outlook_Folders.pl
      use strict;
      use Win32::OLE qw( in valof with );
      use Win32::OLE::Variant;
      use Win32::OLE::Const 'Microsoft Outlook';
      $| = 1;
      
      my $Outlook; # An instance of Outlook
      #  Use existing instance if Outlook is already running
      eval { $Ou
      • Re: (Score:2)

        by barbie (2653)

        Not tried, but you might find this a bit of a d'oh! moment :)

        $Items{ $notice }{0}->{UnRead} = 0; # line 69
        $Items{ $notice }{1}->{UnRead} = 0;

        Your original call was referencing a subroutine and you can't pass arguments to subroutines like that in most languages ;) However, as this is a property you should reference it as you would a hash key/value. The internal OLE workings do the transformations, and will generate read-only accessors for some of the properties, hence the error you got. I had a sim
        • Re: (Score:2)

          by Mr. Muskrat (4572)

          That was the problem and as soon as I saw it, I knew that it would work. Very much a d'oh moment! Thanks Barbie.