Select Code to Download

#!/usr/bin/perl
use strict;
...
    print "\n\n-----\n\n";
}

if ( defined $msg -> {$key} ) { 
    print "$key: ", $msg -> $key, "\n";
}

Class: 43
MessageClass: IPM.Note
...
Sent: 1
DownloadState: 1
MarkForDownload: 1