logrotate.raku

my $path_logs     = '/var/log/gifts/';
my $main_log      = 'deliveries.log';
my $path_main_log = $path_logs ~ $main_log;
my $max_size_log  = 20000000;
my $max_logs      = 5;

exit unless $path_main_log.IO.e;
exit if $path_main_log.IO.s < $max_size_log;

my @log_files = $path_logs.IO.dir.grep(/$main_log$ | $main_log\d+$/).sort;

@log_files.pop.unlink if @log_files.elems == $max_logs;

for @log_files.kv.reverse -> $file, $idx { $file.rename($path_main_log ~ $idx + 1); }