User:Digimer: Difference between revisions
Jump to navigation
Jump to search
No edit summary |
No edit summary |
||
| Line 8: | Line 8: | ||
Pretext | Pretext | ||
</pre> | </pre> | ||
<source lang="perl"> | |||
package AN::Tools; | |||
# This is the "root" package that manages the sub modules and controls access | |||
# to their methods. | |||
# | |||
# Dedicated to Leah Kubik who helped me back in the early days of TLE-BU. | |||
# | |||
BEGIN | |||
{ | |||
our $VERSION="0.1.001"; | |||
} | |||
use strict; | |||
use warnings; | |||
my $THIS_FILE="Tools.pm"; | |||
# Setup for UTF-8 mode. | |||
use utf8; | |||
$ENV{'PERL_UNICODE'}=1; | |||
</source> | |||
Test <span class="code">while (1) { code... }</span> span. | Test <span class="code">while (1) { code... }</span> span. | ||
Revision as of 01:11, 12 October 2009
|
AN!Wiki :: Digimer |
Digimer's details. (I bet you were expecting something useful! ... soon).
Indent
Pretext
package AN::Tools;
# This is the "root" package that manages the sub modules and controls access
# to their methods.
#
# Dedicated to Leah Kubik who helped me back in the early days of TLE-BU.
#
BEGIN
{
our $VERSION="0.1.001";
}
use strict;
use warnings;
my $THIS_FILE="Tools.pm";
# Setup for UTF-8 mode.
use utf8;
$ENV{'PERL_UNICODE'}=1;
Test while (1) { code... } span.
| Any questions, feedback, advice, complaints or meanderings are welcome. | |||
| Alteeve's Niche! | Enterprise Support: Alteeve Support |
Community Support | |
| © Alteeve's Niche! Inc. 1997-2024 | Anvil! "Intelligent Availability®" Platform | ||
| legal stuff: All info is provided "As-Is". Do not use anything here unless you are willing and able to take responsibility for your own actions. | |||