The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
# $Author: domi $
# $Date: 2004/12/07 12:58:38 $
# $Name:  $
# $Revision: 1.3 $

use ExtUtils::MakeMaker;

my @files= qw(Hash/CustomStorage.pm Array/CustomStorage.pm) ;


my %PM = map ( ( "$_" => '$(INST_LIB)'."/Tie/$_" ), @files ) ;

my %M3 = map 
  {
    my $save = $_ ;
    s/\.pm$/.3pm/ ;
    s!/!::!g;
    ( $save => '$(INST_MAN3DIR)/Tie::'."$_" )
  }
  @files  ;

#print join("\n", values %M3),"\n"; exit ;

WriteMakefile
  (
   NAME       => 'Tie-Hash-Array-CustomStorage',
   VERSION    => '1.002',
   ABSTRACT   => 'Tied hash or array with tied or object storage',
   AUTHOR     => 'Dominique Dumont (domi@komarr.grenoble.hp.com)',
   PM         => \%PM ,
   MAN3PODS   => \%M3,
);