Add catches_strings test to test throws char * typemap

Examples/test-suite/perl5/catches_strings_runme.pl

@@ -0,0 +1,10 @@
+use strict;
+use warnings;
+use Test::More tests => 3;
+BEGIN { use_ok('catches_strings') }
+require_ok('catches_strings');
+
+eval {
+  catches_strings::StringsThrower::charstring();
+};
+like($@, qr/\bcharstring message/, "Should have thrown an exception");