Monks
I have a working code using Log::Dispatch::FileRotate, I wanted to extend this using Log::Dispatch::FileRolling to rotate log files based on date (idea is every date should have one log file).
I have modified the script to use Log::Dispatch::FileRolling. The script dies after starting, doesn't throw any error as well.
Please let me know whats the problem with the code 

#!/usr/bin/perl
 
 use strict;
 use warnings;
 
use Log::Dispatch;
use Log::Dispatch::FileRolling;
use Date::Format;
use File::Spec;
 
my @loc = localtime();
my $current_date = Date::Format::strftime("%Y%m%d", @loc);
my $log_dir = "/tmp/myapp";
my $logfile = "myapp.%d{yyyyMMdd}.log";
 
our $HOSTNAME = `hostname`;
chomp $HOSTNAME;

my $log = new Log::Dispatch(
      callbacks => sub { my %h=@_; return $HOSTNAME." $0 \[$$]: ".$h{m
+essage}."\n"; }
);
      
$log->add(Log::Dispatch::FileRolling->new(
                                        name      => 'file1',
                                        min_level => 'info',
                                        filename  => File::Spec->catfi
+le($log_dir, $logfile),
                                        mode      => 'append'
                                        )
);
      

$log->info("Starting Processing:  ".localtime());

[download]

In reply to Log::Dispatch::FileRolling ? by chanakya

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.