—#!/usr/bin/perl
use
5.014000;
use
strict;
use
warnings;
use
App::NAOdash;
use
Getopt::Long;
my
%args
= (
include_versions
=> [],
exclude_versions
=> [],
);
GetOptions(
"exclude-version=s@"
, \
$args
{exclude_versions},
"include-version=s@"
, \
$args
{include_versions},
);
App::NAOdash::run(\
%args
,
@ARGV
);
__END__
=encoding utf-8
=head1 NAME
naodash - Analyze NetHack xlogfiles and extract statistics (command-line interface)
=head1 SYNOPSIS
naodash mgv # Show statistics for the mgv user on NAO
naodash /path/to/xlogfile # Show statistics for a given xlogfile
# Show statistics for mgv, only including games played on 3.4.3 or 3.60
naodash --include-versions=3.6.0 --include-versions=3.4.3 mgv
# Show statistics for mgv, ignoring games played on 3.6.0
naodash --exclude-versions=3.6.0 mgv
=head1 DESCRIPTION
naodash is a command-line interface to L<NetHack::NAOdash>. It takes a
NAO username or a path to an xlogfile, analyzes it, and prints the
results of the analysis. A terminal with ANSI escape code support is
required. Do not parse this command's output. For computer-readable
output, please use the L<NetHack::NAOdash> library directly.
=head1 OPTIONS
=over
=item B<--include-version>=I<version>
Only consider games played on this version of NetHack. Can be
specified multiple times to include multiple versions.
=item B<--exclude-version>=I<version>
Do not consider games played on this version of NetHack. Can be
specified multiple times to exclude multiple versions.
=back
If a version is included and excluded at the same time, games played
on that version will not be considered.
=head1 ENVIRONMENT
=over
=item NAODASH_CACHE
Path to a directory that should be used to cache xlogfiles downloaded
from NAO, or the special value 'none' (case-insensitive) to disable
caching.
By default a directory named 'naodash' in the default temporary
directory (C<< File::Spec->tmpdir >>) is used.
=back
=head1 SEE ALSO
L<NetHack::NAOdash>, L<http://alt.org/nethack/>, L<App::NAOdash>, L<App::Web::NAOdash>
=head1 AUTHOR
Marius Gavrilescu, E<lt>marius@ieval.roE<gt>
=head1 COPYRIGHT AND LICENSE
Copyright (C) 2015 by Marius Gavrilescu
This library is free software; you can redistribute it and/or modify
it under the same terms as Perl itself, either Perl version 5.20.2 or,
at your option, any later version of Perl 5 you may have available.
=cut