Select Code to Download

sub getToken {
    my $output = `curl -k -s -XPOST (URL) -dgrant_type=password -dclie
+nt_id=(client ID) -dclient_secret=(client secret) -dusername=(usernam
+e) -dpassword=(password)`;   
...
        die "output not as expected...\n";
    }    
}