Stories
Slash Boxes
Comments

NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.

use Perl

All the Perl that's Practical to Extract and Report

use Perl Log In

[ Create a new account ]

rurban (7989)

rurban
reversethis-{ta.yar-x} {ta} {nabrur}
http://rurban.xarch.at/

cygwin maintainer for perl, parrot, clisp, postgresql, ... and some perl modules (perl-libwin32, perl-Win32-GUI). Has also some hairy CPAN packages: B::C, B::Generate, C::DynaLib, B::Debugger ...

Journal of rurban (7989)

Monday July 02, 2007

03:47 PM

Some useful ~/bin scripts: new-cygport

[ #33661 ]

Not perl per se, but used to release updated cygwin packages, like perl, perl-libwin32, perl-Win32-GUI, ...

#!/bin/sh # new-cygport <old-release> <new-release> # Sample: new-cygport perl-Win32-GUI-1.0-2 perl-Win32-GUI-1.0.2-1 cp $1.cygport $2.cygport cp $1.cygwin.patch $2.cygwin.patch cp $1.src.patch $2.src.patch PKG=`echo $1 | sed -e 's/\-[^\-]*\-[^\-]*$//'` VER=`echo $1 | sed -e "s/${PKG}\-//" -e 's/\-[^\-]*$//'` OLDBASE=${PKG}-${VER} PKG=`echo $2 | sed -e 's/\-[^\-]*\-[^\-]*$//'` VER=`echo $2 | sed -e "s/${PKG}\-//" -e 's/\-[^\-]*$//'` NEWBASE=${PKG}-${VER} sed -e "s,^--- origsrc/${OLDBASE},--- origsrc/${NEWBASE}," \ -e "s,^+++ src/${OLDBASE},+++ src/${NEWBASE}," < $1.src.patch > $2.src.patch sed -e "s,^--- origsrc/${OLDBASE},--- origsrc/${NEWBASE}," \ -e "s,^+++ src/${OLDBASE},+++ src/${NEWBASE}," < $1.cygwin.patch > $2.cygwin.patch echo cygport $2.cygport get prep make echo nano $2/CYGWIN-PATCHES/README echo cygport $2.cygport mkpatch install check pkg