The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

# -*- perl -*-

use WWW::SolveMedia;
print "1..1\nok 1\n";