#!/usr/bin/perl

use POSIX;
print strftime("%Y-%m-%d-%H%M%S\n", localtime(time));

exit 0;

=head1 NAME

date-tag - print a simple date-tag in form YYYY-MM-DD-hhmmss

=head1 DESCRIPTION

A simple command that prints one line of with the current date-time tags in
the form C<YYYY-MM-DD-hhmmss>.

=head1 SYNOPSIS

 $ date-tag
 2020-05-13-154542

=head1 AUTHOR

Vlado Keselj vlado@dnlp.ca 2020

=head1 LICENSE

Artistic License 1.0 L<perlartistic>

=head1 INSTALLATION

Using C<cpan>:

 $ cpan App::Utils

Manual install:

 $ perl Makefile.PL
 $ make
 $ make install

=cut
