several testcases for perl

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@10403 626c5289-ae23-0410-ae9c-e8d60b6d4f22

Examples/test-suite/perl5/using1_runme.pl

@@ -0,0 +1,10 @@
+#!/usr/bin/perl
+use strict;
+use warnings;
+use Test::More tests => 3;
+BEGIN { use_ok('using1') }
+require_ok('using1');
+
+# adapted from ../python/using1_runme.py
+
+is(using1::spam(37), 37);