Commit f1e879b2 authored by Srikanth Chikkulapelly's avatar Srikanth Chikkulapelly
Browse files

added command line error handling well.

parent b50874c4
...@@ -49,8 +49,12 @@ sub CreateAdminCredential ...@@ -49,8 +49,12 @@ sub CreateAdminCredential
} }
my $numArgs = $#ARGV + 1;
if($numArgs !=2) {
print "Usage: ./genadmincredential.pl <user-urn> <cm-urn>\n\n";
}else{
my $val = CreateAdminCredential @ARGV; my $val = CreateAdminCredential @ARGV;
print STDERR $val->{"code"}; print STDERR $val->{"code"};
print STDERR $val->{"value"}; print STDERR $val->{"value"};
print $val->{"output"}; print $val->{"output"};
}
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment