NAME
Quaint - The great new Quaint!
VERSION
Version 0.01
SYNOPSIS
package Point;
use Quaint;
num req default {
0
} qw/x y/;
function {
$_[0]->x($_[1]);
$_[0]->y($_[2]);
} "move";
1;
...
package Point::Extend;
use Quaint;
extends 'Point';
function {
return sprintf "A point at (%s, %s)\n", $_[0]->x, $_[0]->y;
} qw/describe stringify/;
1;
Attributes
str ro req default {
"STRING"
} trigger {
$_[1] . '_' . time;
} "uid";
Types
any qw/one two three/;
any
bool
str
num
array
hash
obj
Read Only
Make the attribute read only.
any ro qw/one two three/;
Required
Make the attribute required.
any req qw/one two three/;
Default
Set a default for the attribute.
hash default {
{
one => 1,
two => 2,
three => 3
}
} "four"
Trigger
Set a trigger for the attribute.
array trigger {
push @{$_[1]}, 'extending passed array';
return $_[1];
} 'five';
Functions
function {
"";
} 'six';
AUTHOR
LNATION, <email at lnation.org>
BUGS
Please report any bugs or feature requests to bug-quaint at rt.cpan.org
, or through the web interface at https://rt.cpan.org/NoAuth/ReportBug.html?Queue=Quaint. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.
SUPPORT
You can find documentation for this module with the perldoc command.
perldoc Quaint
You can also look for information at:
RT: CPAN's request tracker (report bugs here)
CPAN Ratings
Search CPAN
ACKNOWLEDGEMENTS
LICENSE AND COPYRIGHT
This software is Copyright (c) 2024 by LNATION.
This is free software, licensed under:
The Artistic License 2.0 (GPL Compatible)