package T56;
 
use base 'Exporter';
sub import
{
  my $class = shift;
  print "$class import @{[scalar(@_)]} items: @_\n";
  my $fh = $_[0];
  print $fh "Ouput to first param\n";
}
1;