/usr/local/bin/perl PtfSapGetSyncStg.pl
Can't call method "agent" on an undefined value at PtfSapGetSyncStg.pl line 158.

##</code><code>##

my $ua->agent("Mozilla/5.0");
#my $ua->agent("");