| Server IP : 77.68.64.21 / Your IP : 216.73.217.105 Web Server : Apache System : Linux hp3-wp-1011378.hostingp3.local 3.10.0-1160.144.1.el7.tuxcare.els9.x86_64 #1 SMP Fri Jul 10 17:06:31 UTC 2026 x86_64 User : csh2668128 ( 2112425) PHP Version : 8.1.34 Disable Function : shell_exec,exec,system,popen,set_time_limit MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON Directory : /usr/share/doc/samba-4.8.3/printer-accounting/ |
Upload File : |
#!/usr/bin/perl
#
# 0 == stdin == docuement
# 1 == stdout == printer
# 2 == stderr == logging
#
# Regular, with no redirection
#
umask(002);
# -w132 -l66 -i0 -n pkelly -h master.fcp.oypi.com /var/log/lp-acct
require "getopts.pl";
&Getopts("w:l:i:n:h:");
chomp($date = `date '+%Y-%m-%d.%T'`);
($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,
$atime,$mtime,$ctime,$blksize,$blocks)
= stat(STDIN);
$cnt = 0;
while (sysread(STDIN, $buf, 10240)) {
print $buf;
$cnt += ($buf =~ /^L/g);
}
$acct = shift;
if (open(ACCT, ">>$acct")) {
print ACCT "$date $opt_n $opt_h $size $cnt\n";
close(ACCT);
} else {
warn "Err: Can't account for it ($!)\n";
warn "Log: $date $opt_n $opt_h $size $cnt\n";
}