SED functie

[Verwijderd]

Ik heb een file waar deze info in staat. Zoals je ziet gaat het om jpg-bestandjes met pad.

/home/tomcat/todetail/ar/AR01W1ASA0129062-1.jpg
/home/tomcat/todetail/ar/AR01W1ASA0145249-1.jpg
/home/tomcat/todetail/ar/AR01W1ASA0145307-1.jpg
/home/tomcat/todetail/ar/AR01W1ASA0152175-1.jpg


Ik wil van dit bestand een nieuw bestand maken zonder het pad en zonder de jpg extensie. Dus alleen AR01W1ASA0129062 enz. enz. Dus er zal ook iets van een loopje moeten inzitten.

Wie kan me helpen, zou verdraaide releks zijn.

Thanx

[odysseus]

Op maandag 29 april 2002 14:45 schreef hartgaan het volgende:
Ik wil van dit bestand een nieuw bestand maken zonder het pad en zonder de jpg extensie. Dus alleen AR01W1ASA0129062 enz. enz. Dus er zal ook iets van een loopje moeten inzitten.

code:

#!/usr/bin/perl
open NEW, ">>nieuw_bestand";
open OUD, "oud_bestand";
while (<OUD>)
  {
    $temp = $_;
    $temp =~ s/^.*\///;
    $temp =~ s/\-1\.jpg$//;
    print <NEW> "$temp\n";
  }

Volgens mij moet iets dergelijks wel werken, al heb ik de regexps niet getest. Het kan ook vanaf de commandline met sed, maar ik vind dit over het algemeen handiger en het werkt in principe even goed.

[Verwijderd]

jo thanx. Het is gelukt...

[deadinspace]

Perl is best gaaf enzo, maar hiervoor bestaat al een kant-en-klare oplossing

code:

[marcelm@nothing marcelm]$ basename /usr/bin/gtk-gnutella 
gtk-gnutella

[edit]
Goed, nadat ik wat beter gelezen had zag ik dat ook de extensie eraf moest...

code:

[marcelm@nothing marcelm]$ basename /home/backgrounds/second.moon.jpg | sed 's/\.[^.]*$//'
second.moon
[marcelm@nothing marcelm]$

Wordtet dan... Maar das wel wat minder kant-en-klaar
[/edit]

[Jordi]

Mjaaaaa... maar als je heel even de handleiding van 'sed' doorleest, kom je er misschien wel uit. Misschien ook wel niet. Ik kon in elk geval niet uit je topic opmaken dat je veel zelf gedaan hebt, het is wel de bedoeling dat je dat doet in NOS