6 use CGI::Carp qw(fatalsToBrowser);
7 use FS::UID qw(cgisuidsetup);
12 print $cgi->header( '-expires' => '-2m' ),
13 header('Current Receivables Report Results');
15 open (REPORT, "/usr/bin/freeside-receivables-report -v freeside |");
23 print '</BODY></HTML>';