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

<%
$t->eok($0 =~ /transfer2\.inc$/ ? 1 : 0, "\$0 is not correct: $0");
$t->done;
%>