[dodgers]$ curl https://secondroad.harvestapp.com/account/who_am_i -H 'Accept: application/xml' -H 'Content-Type: application/xml' -u elliott.williams@secondroad.com.au:*****
<?xml version="1.0" encoding="UTF-8"?>
<hash>
  <user>
    <admin type="boolean">true</admin>
    <timestamp-timers type="boolean">false</timestamp-timers>
    <email>elliott.williams@secondroad.com.au</email>
    <id type="integer">111331</id>
    <timezone>Sydney</timezone>
  </user>
</hash>

##</code><code>##

[dodgers]$ perl perl_requests.pl 
  % Total    % Received % Xferd  Average Speed   Time    Time     Time  Current
                                 Dload  Upload   Total   Spent    Left  Speed
  0    38    0    38    0     0    214      0 --:--:-- --:--:-- --:--:--     0
Authentication failed for API request.[dodgers]$ 

##</code><code>##

#!/usr/bin/perl


my $xml = qx{curl https://secondroad.harvestapp.com/account/who_am_i -H 'Accept: application/xml' -H 'Content-Type: application/xml' -u elliott.williams@secondroad.com.au:*****};


print $xml;