Something like this (untested):

perl -MLWP::UserAgent -wle 'print LWP::UserAgent -> new -> 
post ("https://xxx.xxx.xx.xxx/portal/webservices.cgi", 
[`cat topup.txt`]) -> content'
[download]

Abigail