print Dumper( $MsgTxt );

##</code><code>##


my $MsgId = $imap->search('uid', '257283')->[0];