Select Code to Download

use TeamSite::WFsystem ;
$system = new TeamSite::WFsystem() ;
...
foreach my $job (@{$ar_jobs}){
  print "$job \n" ;
}