1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38
|
package Demeter::Here;
sub here {return substr($INC{'Demeter/Here.pm'}, 0, -7)};
1;
=head1 NAME
Demeter::Here - A compile-time tool
=head1 VERSION
This documentation refers to Demeter version 0.9.26.
=head1 SYNOPSIS
This small module identifies the installation location of Demeter for
use in the BEGIN block of a GUI application. It is currently used to
post a splashscreen during start-up.
=head1 AUTHOR
Bruce Ravel, L<http://bruceravel.github.io/home>
L<http://bruceravel.github.io/demeter/>
=head1 LICENCE AND COPYRIGHT
Copyright (c) 2006-2019 Bruce Ravel (http://bruceravel.github.io/home). All rights reserved.
This module is free software; you can redistribute it and/or
modify it under the same terms as Perl itself. See L<perlgpl>.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
=cut
|