diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 2000-02-22 09:38:58 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-02-22 09:38:58 +0000 |
| commit | f83d2536257d3a72eef5f8d789c0784171782b42 (patch) | |
| tree | cbf6b2188017731581350b7d0cb31e36a8adcb5c /epoc/createpkg.pl | |
| parent | 012bcf8d26492bcf446b8c77c363cfa2f1a6a609 (diff) | |
| download | perl-f83d2536257d3a72eef5f8d789c0784171782b42.tar.gz | |
EPOC port update (from Olaf Flebbe <O.Flebbe@science-computing.de>)
p4raw-id: //depot/perl@5193
Diffstat (limited to 'epoc/createpkg.pl')
| -rw-r--r-- | epoc/createpkg.pl | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/epoc/createpkg.pl b/epoc/createpkg.pl index 7270504974..6977bd385f 100644 --- a/epoc/createpkg.pl +++ b/epoc/createpkg.pl @@ -3,17 +3,17 @@ use File::Find; use Cwd; -$VERSION="5.005"; -$PATCH=63; -$EPOC_VERSION=16; +$VERSION="5.5"; +$PATCH="650"; +$EPOC_VERSION=19; $CROSSCOMPILEPATH=cwd; -$CROSSREPLACEPATH="H:\\devel\\perl5.005_63"; +$CROSSREPLACEPATH="H:\\devel\\perl5.5.650"; sub filefound { my $f = $File::Find::name; - return if ( $f =~ /unicode|CPAN|ExtUtils|IPC|User|DB.pm|\.a$|\.ld$|\.exists$/i); + return if ( $f =~ /CVS|unicode|CPAN|ExtUtils|IPC|User|DB.pm|\.a$|\.ld$|\.exists$/i); my $back = $f; $back =~ s|$CROSSCOMPILEPATH||; @@ -22,7 +22,7 @@ sub filefound { my $psiback = $back; - $psiback =~ s/\\lib\\/\\perl\\lib\\$VERSION$PATCH\\/i; + $psiback =~ s/\\lib\\/\\perl\\lib\\$VERSION.$PATCH\\/i; print OUT "\"$CROSSREPLACEPATH$back\"-\"!:$psiback\"\n" if ( -f $f ); ; @@ -35,6 +35,6 @@ print OUT "#{\"perl$VERSION\"},(0x100051d8),$PATCH,$EPOC_VERSION,0\n"; print OUT "\"$CROSSREPLACEPATH\\perlmain.exe\"-\"!:\\perl.exe\"\n"; find(\&filefound, cwd.'/lib'); -print OUT "@\"G:\\lib\\stdlib.sis\",(0x010002c3)\n" +print OUT "@\"G:\\lib\\stdlib.sis\",(0x0100002c3)\n" |