Bug#343116: Test script

[Brett Smith]

As usual, I forgot to attach my test script in the bug report.  Here it
is.

pamtest.pl
Description: Perl program