On Fri, 16 May 2025 01:11:48 +0200
Vincent Veyron <vv.li...@wanadoo.fr> wrote:
>
> I have a working prototype
>
Well, scratch that, it does work on a slow spinning disk, not on SSD :-\
Also, I'm getting something strange when testing for the presence of a file
before removing it, as in :
if ( -e $r->document_root() . '/base/listing/' .
$r->pnotes('session')->{_session_id} . '.tar.gz' ) {
warn 'tar file detected' ;
my @args = ( 'rm', $r->document_root() . '/base/listing/' .
$r->pnotes('session')->{_session_id} . '.tar.gz' ) ;
system(@args) == 0 or warn "system @args failed: $?" ;
} else {
warn 'tar file NOT detected' ;
}
error_log shows :
tar file detected at /home/lib/Marica/Base/Rapports/export_raw_data.pm line 67.
tar file NOT detected at /home/lib/Marica/Base/Rapports/export_raw_data.pm line
75.
?
Not sure what's wrong, but I'll have to work on this some more.
--
vv.lists <vv.li...@wanadoo.fr>
