Select Code to Download

open FOO, '>', $filename or die "Can't open $filename: $!\n";
$object->cat(\*FOO, $target);