Re: [cobalt-users] Where to get stripheader.pl?

[Albert Csaba <maka_cs@xxxxxxxxx>]

This is the stripheader.pl from
ftp://ftp.cobaltnet.com/pub/users/jeffb/scripts, I had
it on my machine:



#!/usr/bin/perl
# Cobalt Networks, 1999
# Jeff Bilicki <jeffb@xxxxxxxxxxxxx>
# removes the header out of a Qube 2 and RaQ 2 backup
file

use strict;

my ($infile);
my ($outfile) = "out.tar.gz";
my ($end) = "\%\%END_INDEX";
my ($begin) = "\%\%BACKUP_HEADER";
my ($endxml) = "\%\%END_XML";
my ($beginxml) = "\%\%BACKUP_XML";

if (@ARGV) {
        $infile = $ARGV[0];
} else {
        print "usage: stripheader.pl <file name>\n";
        exit 1;
}

open (INFILE, $infile) or die "Can't open: $!\n";
open (OUTFILE, ">$outfile") or die "Can't open $!\n";

while (<INFILE>) {
	next if ( /^$begin/ ... /^$end/ );
	next if ( /^$beginxml/ ... /^$endxml/ );
	print OUTFILE $_;
}
close(INFILE);
close(OUTFILE);
exit 0;




--- Herby K wrote:
> i mailed jeff off list because I need 2 files für
> cmu from this location. -
> if I get any response I tell you
> 
> rgds
> herby
> 
> ----- Original Message -----
> From: "Tomás García Ferrari" 
> To: "Cobalt Users" <cobalt-users@xxxxxxxxxxxxxxx>
> Sent: Monday, November 11, 2002 12:03 PM
> Subject: [cobalt-users] Where to get stripheader.pl?
> 
> 
> > Hello!
> >
> > I need to extract some files from a .raq backup,
> and I'm trying to find
> this
> > script. All the links are pointing to:
> >
> >
>
ftp://ftp.cobaltnet.com/pub/users/jeffb/scripts/stripheader.pl
> >
> > but this host seems to be discontinued... Any
> help?
> >
> > Regards,
> > Tomás
> >
> > +--                                --+
> >     Tomás García Ferrari
> >     Bigital
> >     http://bigital.com/
> > +--                                --+
> >


__________________________________________________
Do you Yahoo!?
U2 on LAUNCH - Exclusive greatest hits videos
http://launch.yahoo.com/u2