From Code to Community: Sponsoring The Perl and Raku Conference 2025 Learn more
12345678910111213141516171819 ### one pass graphics tools### this system is used in the onepassbitmapalgorithmssub new { my $class = shift; $self = { algorithm => undef, }; bless $self, $class;}### FIXME run the OnePassAlgorithm or overridesub run { my ($self, $algo) = @_; return undef;}1;
### one pass graphics tools
### this system is used in the onepassbitmapalgorithms
sub
new {
my
$class
=
shift
;
$self
= {
algorithm
=>
undef
, };
bless
,
}
### FIXME run the OnePassAlgorithm or override
run {
(
$algo
) =
@_
return
1;