/ Forside / Teknologi / Udvikling / Perl / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
Perl
#NavnPoint
bjarneA 141
poul_from 50
soccer 30
Nicknack 14
Tmpj 0
halen af en streng.
Fra : CykelSmeden fra Aalb~


Dato : 01-01-02 13:30

Er der en nem funktion som kan levere alt fra det SIDSTE '=' i en streng med
flere '=' uden at skulle iterere sig frem?

finn

--
--- CykelSmeden.... edb på gadeplan

Hvis intet er anført, taler jeg om RH 7.1
og når jeg spørger, er det bare fordi jeg ved for lidt!



 
 
Martin Moller Peders~ (01-01-2002)
Kommentar
Fra : Martin Moller Peders~


Dato : 01-01-02 14:33

In <3c31aa21$0$5471$edfadb0f@dspool01.news.tele.dk> "CykelSmeden fra Aalborg" <outlook@acnord.SLET.dk> writes:

>Er der en nem funktion som kan levere alt fra det SIDSTE '=' i en streng med
>flere '=' uden at skulle iterere sig frem?

>finn

ja,

[^=] betyder alt andet end =

while (<>) {
m/=([^=]*)$/;
$detSidste=$1;
print $detSidste . "\n";
}


CykelSmeden fra Aalb~ (01-01-2002)
Kommentar
Fra : CykelSmeden fra Aalb~


Dato : 01-01-02 18:33

"Martin Moller Pedersen" <tusk@daimi.au.dk> skrev i en meddelelse
>
> >flere '=' uden at skulle iterere sig frem?
>
> >finn
>
> ja,
>
> [^=] betyder alt andet end =
>
> while (<>) {
> m/=([^=]*)$/;
> $detSidste=$1;
> print $detSidste . "\n";
> }

Jeg døjet lidt med den (jeg ER begynder), men skal lige have bygget denne
til en one-liner:

@ord = split('=',$linie) ;
$streng = $ord[-1];

finn



Morten Brix Pedersen (01-01-2002)
Kommentar
Fra : Morten Brix Pedersen


Dato : 01-01-02 19:06

CykelSmeden fra Aalborg wrote:

> "Martin Moller Pedersen" <tusk@daimi.au.dk> skrev i en meddelelse
>
>>>flere '=' uden at skulle iterere sig frem?
>>>
>>>finn
>>>
>>ja,
>>
>>[^=] betyder alt andet end =
>>
>>while (<>) {
>> m/=([^=]*)$/;
>> $detSidste=$1;
>> print $detSidste . "\n";
>>}
>>
>
> Jeg døjet lidt med den (jeg ER begynder), men skal lige have bygget denne
> til en one-liner:
>
> @ord = split('=',$linie) ;
> $streng = $ord[-1];


Eksemplet han gav var også lidt underligt efter han bruge while(<>) (det
er STDIN)


$linie = "dette = er = en test";
$linie =~ m/=([^=]*)$/;
print $1 . "\n";'

Det vil printe ' en test'.

- Morten.


CykelSmeden fra Aalb~ (01-01-2002)
Kommentar
Fra : CykelSmeden fra Aalb~


Dato : 01-01-02 21:04

"Morten Brix Pedersen" <morten@wtf.dk> skrev i en meddelelse > >>
> >>while (<>) {
> >> m/=([^=]*)$/;
> >> $detSidste=$1;
> >> print $detSidste . "\n";
> >>}
> >>
> >
> > Jeg døjet lidt med den (jeg ER begynder), men skal lige have bygget
denne
> > til en one-liner:
> >
> > @ord = split('=',$linie) ;
> > $streng = $ord[-1];
>
>
> Eksemplet han gav var også lidt underligt efter han bruge while(<>) (det
> er STDIN)
>
>
> $linie = "dette = er = en test";
> $linie =~ m/=([^=]*)$/;
> print $1 . "\n";'
>
> Det vil printe ' en test'.
>
> - Morten.
>
Tak den forstår jeg bedre, og den virkede med det samme

finn




CykelSmeden fra Aalb~ (01-01-2002)
Kommentar
Fra : CykelSmeden fra Aalb~


Dato : 01-01-02 22:23

mit sidste indlæg var som i ser forkert. chomp virker på min redhat, jeg får
bare en fejl i den solarisversion jeg skulle bruge scriptet på:
# /u2/oracle.733/ows/3.0/perl/bin/perl -v

This is perl, version 5.003 with EMBED
built under solaris at May 4 1997 15:15:58
+ suidperl security patch

Copyright 1987-1996, Larry Wall

jeg kan heller ikke få scriptet til at virke med
#!/u2/oracle.733/ows/3.0/perl/bin/perl
i første linie;(

finn
> --- CykelSmeden.... edb på gadeplan
> og når jeg spørger, er det bare fordi jeg ved for lidt!
>
>



CykelSmeden fra Aalb~ (01-01-2002)
Kommentar
Fra : CykelSmeden fra Aalb~


Dato : 01-01-02 23:40

u
"CykelSmeden fra Aalborg" <outlook@acnord.SLET.dk> skrev i en meddelelse
news:3c32270a$0$5468$edfadb0f@dspool01.news.tele.dk...
> mit sidste indlæg var som i ser forkert. chomp virker på min redhat, jeg
får
> bare en fejl i den solarisversion jeg skulle bruge scriptet på:
> # /u2/oracle.733/ows/3.0/perl/bin/perl -v
>
> This is perl, version 5.003 with EMBED
> built under solaris at May 4 1997 15:15:58
> + suidperl security patch
>
> Copyright 1987-1996, Larry Wall
>
> jeg kan heller ikke få scriptet til at virke med
> #!/u2/oracle.733/ows/3.0/perl/bin/perl
> i første linie;(
>
> finn
> > --- CykelSmeden.... edb på gadeplan
> > og når jeg spørger, er det bare fordi jeg ved for lidt!
> >
> >
>
>



Thorbjørn Ravn Ander~ (02-01-2002)
Kommentar
Fra : Thorbjørn Ravn Ander~


Dato : 02-01-02 00:17

"CykelSmeden fra Aalborg" <outlook@acnord.SLET.dk> writes:

> mit sidste indlæg var som i ser forkert. chomp virker på min redhat, jeg får
> bare en fejl i den solarisversion jeg skulle bruge scriptet på:
> # /u2/oracle.733/ows/3.0/perl/bin/perl -v
>
> This is perl, version 5.003 with EMBED
> built under solaris at May 4 1997 15:15:58
> + suidperl security patch
>

Der er sket en del ting siden 1997. Har du mulighed for at få oversat
en ny Perl på systemet? Det er ret enkelt, hvis der er en C-compiler
lagt ind.

--
Thorbjørn Ravn Andersen
http://unixsnedkeren.dk

CykelSmeden fra Aalb~ (02-01-2002)
Kommentar
Fra : CykelSmeden fra Aalb~


Dato : 02-01-02 03:50


"Thorbjørn Ravn Andersen" <thunderbear@bigfoot.com> skrev i en meddelelse
news:kkheq5slu3.fsf@mimer.null.dk...
> "CykelSmeden fra Aalborg" <outlook@acnord.SLET.dk> writes:
> > This is perl, version 5.003 with EMBED
> > built under solaris at May 4 1997 15:15:58
> > + suidperl security patch
> >
>
> Der er sket en del ting siden 1997. Har du mulighed for at få oversat
> en ny Perl på systemet? Det er ret enkelt, hvis der er en C-compiler
> lagt ind.
>
Nej der er ikke compiler på maskinen. Jeg har med held installeret nogle
packets, og også forsøgt mig med perl, da jeg ikke troede der var
installeret perl
> # /u2/oracle.733/ows/3.0/perl/bin/perl
men snublede over den adresse ved et tilfælde, og fandt ud af den faktisk
virkede.

mine forsøg er altid endt med at få meldingen at der mangler plads på en
bestemt partition. Jeg ha gigs af plads, bare ikke hvor den pakke skal bruge
den ;(

nå jeg skal kun bruge perl til små hjælpescripts, som jeg forsøder
tilværelsen med, så det går nok

hilsen og godt nytår

finn



Thorbjørn Ravn Ander~ (02-01-2002)
Kommentar
Fra : Thorbjørn Ravn Ander~


Dato : 02-01-02 10:38

"CykelSmeden fra Aalborg" <outlook@acnord.SLET.dk> writes:

> mine forsøg er altid endt med at få meldingen at der mangler plads på en
> bestemt partition. Jeg ha gigs af plads, bare ikke hvor den pakke skal bruge
> den ;(

Hvordan ser det ud hvis du skriver "df" eller "df -k". Det kan let
vaere din /var partition der er loebet fuld.

--
Thorbjørn Ravn Andersen
http://unixsnedkeren.dk

CykelSmeden fra Aalb~ (02-01-2002)
Kommentar
Fra : CykelSmeden fra Aalb~


Dato : 02-01-02 12:34


"Thorbjørn Ravn Andersen" <thunderbear@bigfoot.com> skrev i en meddelelse
news:kky9jh5c05.fsf@mimer.null.dk...
> "CykelSmeden fra Aalborg" <outlook@acnord.SLET.dk> writes:
>
> > mine forsøg er altid endt med at få meldingen at der mangler plads på en
> > bestemt partition. Jeg ha gigs af plads, bare ikke hvor den pakke skal
bruge
> > den ;(
>
> Hvordan ser det ud hvis du skriver "df -k". Det kan let
> vaere din /var partition der er loebet fuld.
Filesystem kbytes used avail capacity Mounted on
/dev/dsk/c0t0d0s0 61735 19839 35723 36% /
/dev/dsk/c0t0d0s6 577695 381841 138085 74% /usr
/proc 0 0 0 0% /proc
fd 0 0 0 0% /dev/fd
/dev/dsk/c0t0d0s3 67815 37761 23273 62% /var
/dev/dsk/c0t0d0s7 192807 33301 140226 20% /export/home
/dev/dsk/c0t0d0s5 96031 84071 2357 98% /opt
/dev/dsk/c0t1d0s6 2012390 610795 1341224 32% /ac
/dev/dsk/c0t0d0s4 665351 514394 91076 85% /u1
/dev/dsk/c1t4d0s4 8705501 3070165 5548281 36% /u2
/dev/dsk/c1t2d0s4 2011630 1530298 420984 79% /u3
/dev/dsk/c1t3d0s4 1713606 1183938 478260 72% /u4
swap 192168 4400 187768 3% /tmp

og jeg mener du har ret det er /var som har for lidt plads
jeg ved ikke om man kan øge pladset rimeligt sikkert. Det er en
'produktionsmaskine' med et stort bibliotekssystem i drift. - jeg er rimelig
forsigtig med ændringer

finn



Thorbjørn Ravn Ander~ (02-01-2002)
Kommentar
Fra : Thorbjørn Ravn Ander~


Dato : 02-01-02 12:46

"CykelSmeden fra Aalborg" <outlook@acnord.SLET.dk> writes:

> > > mine forsøg er altid endt med at få meldingen at der mangler plads på en
> > > bestemt partition. Jeg ha gigs af plads, bare ikke hvor den pakke skal
> bruge
> > > den ;(
> >
> > Hvordan ser det ud hvis du skriver "df -k". Det kan let
> > vaere din /var partition der er loebet fuld.
> Filesystem kbytes used avail capacity Mounted on

> /dev/dsk/c0t0d0s5 96031 84071 2357 98% /opt

> og jeg mener du har ret det er /var som har for lidt plads
> jeg ved ikke om man kan øge pladset rimeligt sikkert. Det er en
> 'produktionsmaskine' med et stort bibliotekssystem i drift. - jeg er rimelig
> forsigtig med ændringer

Forstaaes.

Du snakker om pakker - mange forudoversatte pakker til SOlaris, havner
i /opt og her har du kun 2Mb fri. At den kun er sat til 100 Mb synes
jeg er lidt suspekt.

Lige i dette tilfaelde kan du svjh goere de 10% der er sat af til
ekstra arbejde tilgaengelige (bemaerk at 84+2 kun giver 86, ikke 96)
med "tunefs" kommandoen.

Det var maaske tiden at faa flyttet lidt rundt paa ting saa du kan faa
mere plads? Eventuelt putte /opt tilbage til en stor partition?

--
Thorbjørn Ravn Andersen
http://unixsnedkeren.dk

CykelSmeden fra Aalb~ (02-01-2002)
Kommentar
Fra : CykelSmeden fra Aalb~


Dato : 02-01-02 14:08


"Thorbjørn Ravn Andersen" <thunderbear@bigfoot.com> skrev i en meddelelse
news:kkg05pf01r.fsf@mimer.null.dk...
> "CykelSmeden fra Aalborg" <outlook@acnord.SLET.dk> writes:
>

> Du snakker om pakker - mange forudoversatte pakker til SOlaris, havner
> i /opt og her har du kun 2Mb fri. At den kun er sat til 100 Mb synes
> jeg er lidt suspekt.

de pakker jeg har installeret med held (ntp-top-ssh-samba) har alle været
venlige at lade mig bestemme hvorfra-til de skulle installeres, og jeg har
undgået /opt af samme grund.
Det har været 98% brugt siden nyinstall. af maskinen. Jeg har antaget det
var som det skulle være da den er sat op af et af de største firmaer med
egne SUNeksperter ;(

> Lige i dette tilfaelde kan du svjh goere de 10% der er sat af til
> ekstra arbejde tilgaengelige (bemaerk at 84+2 kun giver 86, ikke 96)
> med "tunefs" kommandoen.
Det lyder spændende, men for mig uforståeligt! -hvilke 10% hvad er det fo
84+2 du mener?

jeg kendte ikke tunefs, men kan se den kan optimee 'til space' fremfor
'speed'. Jeg må prøve at studere den lidt.

> Det var maaske tiden at faa flyttet lidt rundt paa ting saa du kan faa
> mere plads? Eventuelt putte /opt tilbage til en stor partition?
>
Jeg har tænkt om man kan kopiere hele /opt til en midlertidig sti, indsætte
en ekstra scsii disk og mounte den til /opt. kan det gøres uden den store
risiko fr datatab?

hilsen finn



Thorbjørn Ravn Ander~ (02-01-2002)
Kommentar
Fra : Thorbjørn Ravn Ander~


Dato : 02-01-02 14:15

"CykelSmeden fra Aalborg" <outlook@acnord.SLET.dk> writes:

> Det lyder spændende, men for mig uforståeligt! -hvilke 10% hvad er det fo
> 84+2 du mener?

Operativsystemet reserverer som standard 10% af en disk. Det kan man justere.

> Jeg har tænkt om man kan kopiere hele /opt til en midlertidig sti, indsætte
> en ekstra scsii disk og mounte den til /opt. kan det gøres uden den store
> risiko fr datatab?

Det kan det godt. Single user mode og derud af. Check i
dk.edb.system.unix hvis der er detaljer der skal afklares.
--
Thorbjørn Ravn Andersen
http://unixsnedkeren.dk

Lars Balker Rasmusse~ (02-01-2002)
Kommentar
Fra : Lars Balker Rasmusse~


Dato : 02-01-02 17:23

"CykelSmeden fra Aalborg" <outlook@acnord.SLET.dk> writes:
> Det har været 98% brugt siden nyinstall. af maskinen. Jeg har antaget det
> var som det skulle være da den er sat op af et af de største firmaer med
> egne SUNeksperter ;(

Det ligner Solaris-defaults. At vide præcis hvorfor de ikke er gode
kræver nogle års drifts-erfaring, og det kan godt være de her
Sun-eksperter har installeret mange maskiner, men næppe haft glæden af
at slåsse med fulde diske...

(For resten hedder det Sun, ikke SUN. Det er ikke et akronym.)
--
Lars Balker Rasmussen

Lars G. T. Jørgensen (02-01-2002)
Kommentar
Fra : Lars G. T. Jørgensen


Dato : 02-01-02 18:21

Lars Balker Rasmussen skrev:
[SNIP!]
>

Stod det ikke for S... University Network til at starte med?
Eller noget lignende?

> (For resten hedder det Sun, ikke SUN. Det er ikke et akronym.)


--
Mvh|Regards, Lars
Student at Department of Computer Science and Department of Psychology
University of Copenhagen --- http://www.diku.dk/students/larsj/
When's the last time you used duct tape on a duct? -- Larry Wall

Lars Balker Rasmusse~ (02-01-2002)
Kommentar
Fra : Lars Balker Rasmusse~


Dato : 02-01-02 19:55

larsj@ask.diku.dk (Lars G. T. Jørgensen) writes:
> > (For resten hedder det Sun, ikke SUN. Det er ikke et akronym.)
>
> Stod det ikke for S... University Network til at starte med?
> Eller noget lignende?

Jo, Andreas Bechtolsheim startede Sun mens han studerede på Stanford
(2 af de 3 andre der kom til lidt senere var også fra Stanford (Vinod
Khosla og Scott McNealy), mens Bill Joy var fra Berkeley).

Men Sun er ikke en akronym *længere*.
--
Lars Balker Rasmussen                  "S.M.R.T."

Søg
Reklame
Statistik
Spørgsmål : 177558
Tips : 31968
Nyheder : 719565
Indlæg : 6408914
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste