http://7fh6tueqddpjyxjmgtdiueylzoqt6pt7hec3pukyptlmohoowvhde4yd.onion/public-inbox.git/tree/lib/PublicInbox/Emergency.pm
. $_ } qw(/tmp /new /cur) ); bless { dir => $dir , t => 0 }, $class ; } sub _fn_in { my ( $self , $pid , $dir ) = @_ ; my $host = $self ->{- host } // = ( split ( /\./ , hostname ))[ 0 ] // 'localhost' ; my $now = time ; my $n ; if ( $self ->{ t } != $now ) { $self ->{ t } = $now ; $n = $self ->{ cnt } = 0 ; } else { $n = ++ $self ->{ cnt }; } " $self ->{dir}/ $dir / $self ->{t}.