# Automatically generated sample implementation code
# PLEASE EDIT     PLEASE EDIT      PLEASE EDIT.
# Generated on Sun May  7 10:53:56 2000 by idl2perl 1.43 with command:
# bin/idl2perl -impl Test.idl

use COPE::Test::Test4_types;
use COPE::Test::Test4_skel;

# interface Test::Test4 (IDL:smop.org/Test/Test4:1.0)

package Test::Test4_impl;
use COPE::CORBA::Servant;
@Test::Test4_impl::ISA=qw(::Test::Test3_impl ::Test::Test1_impl CORBA::BOA::_Servant);
sub _skelname($) { 'Test::Test4_skel' }

1;