Rozdiely pre scripts/perl/postfix/pf-savelog-mysql.pl medzi verziami 1.5 a 1.6
| verzia 1.5, 2005/09/16 21:29:28 |
verzia 1.6, 2005/12/04 21:33:24 |
|
|
| # |
# |
| |
|
| |
|
| # $Platon: scripts/perl/postfix/pf-savelog-mysql.pl,v 1.4 2004/10/31 11:50:28 rajo Exp $ |
# $Platon: scripts/perl/postfix/pf-savelog-mysql.pl,v 1.5 2005/09/16 21:29:28 rajo Exp $ |
| |
|
| use strict; |
use strict; |
| |
|
| Riadok 45 while (my $line = <STDIN>) { |
|
| Riadok 45 while (my $line = <STDIN>) { |
|
| $log->savelog($line) or print STDERR "Error saving log entry #$nr: '$line'"; |
$log->savelog($line) or print STDERR "Error saving log entry #$nr: '$line'"; |
| } |
} |
| |
|
| |
# IMPORTANT, otherwise you can lose some data |
| |
$log->flush(); |
| |
|
| |
|
| # vim: ts=4 |
# vim: ts=4 |
Platon Group <platon@platon.sk> http://platon.sk/
|
|
Prihlásiť
Registrácia
English
![[BACK]](http://cvsweb.platon.sk/icons/back.gif){kind=icon}
![[TXT]](http://cvsweb.platon.sk/icons/text.gif){kind=icon}
![[DIR]](http://cvsweb.platon.sk/icons/dir.gif){kind=icon}
Vyššie na