#!perl -w
use strict;
use warnings;
use App::Rolling;

App::Rolling->run(@ARGV);

__END__

=encoding UTF-8

=head1 NAME

roll - rotate input stream into pieces automatically, and write down to file


=head1 SYNOPSIS

    $ roll [option]

Example:

    $ /usr/sbin/tcpdump | roll -f /tmp/dump

Options:

    -f --file        write file path *require*
    -a --age         number of rotate age [default:5]
    -i --interval    file rolling interval(sec) [default:60]
    -t --through     write down and through STDIN
    -nr --no-rotate  never rotate output

    -v --version     show version
    -h --help        show help

=head1 AUTHOR

Dai Okabayashi E<lt>bayashi@cpan.orgE<gt>


=head1 SEE ALSO

L<App::Rolling>


=head1 LICENSE

This module is free software; you can redistribute it and/or
modify it under the same terms as Perl itself. See L<perlartistic>.


=cut