SAP related Perl coding