diag prints out a message along with the rest of the output.
Use it for whatever extra output in order to ensure that your printouts will not interfere with future changes in the test environment modules (such as Test::Harness).
diag "We are going to test the Foo-Bar device now";
# We are going to test the Foo-Bar device now
| Prev | Home (Copyright Gabor Szabo) Perl Training Israel | Next |
| Test::More is( value, expected_value, name); | Up | like(value, qr/expected regex/, name); |