while (my $command = $ftpgizmo->next_ftp_command )
{
    print OUT eval qq{"$command\n"};
}