sub CheckDeployed
{
 chomp (my $id = $_);

##</code><code>##

chomp( my $id = $_[0] );