The Perl Toolchain Summit 2025 Needs You: You can help 🙏 Learn more

#!perl
use autodie;
plan 'tests' => 1;
my $explain = Pg::Explain->new( 'source_file' => 't/plans/18-plan', );
my $top = $explain->top_node;
ok(
abs( $top->total_exclusive_time ) < 0.001, # it's float so i have to use < instead of = 0
'total exclusive time (0.000) - calculated exclusive times of node'
);