Select Code to Download

@args = qw/-p $project->name/;
push @args, '-f' if $force;
system "inc_seqs", @args;

sub is_tainted {
    my $arg = shift;
...
    eval { eval "# $nada" };
    return length($@) != 0;
}