From Code to Community: Sponsoring The Perl and Raku Conference 2025 Learn more
1234567891011121314151617181920 package Evo::Inference::PostCondition;sub new { my ($class, $clause) = @_; my $self = { clause => $clause, }; $class = ref($class) || $class; bless $self, $class;}sub solve { my ($self, @postvars) = @_;}1;
package
Evo::Inference::PostCondition;
sub
new {
my
(
$class
,
$clause
) =
@_
;
$self
= {
clause
=>
};
=
ref
) ||
bless
}
solve {
@postvars
1;