Select Code to Download

use warnings;
use strict;
use Mail::Webmail::Gmail;
...
foreach my $label (@labels) {
    print "Label: $label\n";
}