#!/usr/bin/perl
use perl5i::latest;
use Test::More;
open my $fh, "<", $0;
ok eval { $fh->autoflush(1); 1; } or die $@;
done_testing();
#!/usr/bin/perl
use perl5i::latest;
use Test::More;
open my $fh, "<", $0;
ok eval { $fh->autoflush(1); 1; } or die $@;
done_testing();