Select Code to Download

sub PerformSS {
   my $self = shift;
...
   }
   return $status;
}

      $status = $self->PerformSS("get \$/project -R -I-Y -V\"$label\""
+);

      $status = $self->PerformSS("get \$/project -R -I-Y");