SQL-Accounting

[Tim Stone]

>
> unlang supports only SELECT statements. Call your procedure from a perl
> script.
>

1) can I access to all accounting releated information from the perl
module like in the sql-module?
Are any examples out there?

#		Start = "INSERT INTO ${acct_table} (AcctSessionId, UserName, \
#		 NASIPAddress, FramedIPAddress, AcctStartTime, AcctStopTime, \
#		 AcctSessionTime, AcctTerminateCause) VALUES                 \
#		 ('%{Acct-Session-Id}', '%{User-Name}', '%{NAS-IP-Address}', \
#		 '%{Framed-IP-Address}', '%S', '0', '0', '');"
#		Stop = "INSERT INTO ${acct_table} (AcctSessionId, UserName,  \
#		 NASIPAddress, FramedIPAddress, AcctStartTime, AcctStopTime, \
#		 AcctSessionTime, AcctTerminateCause) VALUES                 \
#		 ('%{Acct-Session-Id}', '%{User-Name}', '%{NAS-IP-Address}', \
#		 '%{Framed-IP-Address}', '0', '%S', '%{Acct-Session-Time}',  \
#		 '%{Acct-Terminate-Cause}');"
#		Alive = "INSERT INTO ${acct_table} (AcctSessionId, UserName, \
#		 NASIPAddress, FramedIPAddress, AcctStartTime, AcctStopTime, \
#		 AcctSessionTime, AcctTerminateCause) VALUES                 \
#		 ('%{Acct-Session-Id}', '%{User-Name}', '%{NAS-IP-Address}', \
#		 '%{Framed-IP-Address}', '0', '0', '%{Acct-Session-Time}','');"

2) If I user the perl module, so I must log on the database each time
the module is invoked?

Thanks for help!

Tim