import source from 1.3.40
[external/swig.git] / Examples / perl5 / xmlstring / runme.pl
1 use example;
2
3
4 $e1 = new example::XMLChTest();
5 $e1->set("hello");
6 print $e1->get(),"\n";
7 print $e1->get_first(),"\n";
8