Select Code to Download

sub get_text_parts {
    my @parts = shift->parts;
...
    return $parts[0] if $which =~ /text/; 
    return $parts[1] if $which =~ /html/;
}

$ ./grab.pl mime4 html
line1
...
line2
line3
$