Re: [PERL] Regular Expressions

[sslug@sslug (Lars G. T. Jorgensen)]

"Morten Egelund Rasmussen" <sslug@sslug> writes:

> Perl er totalt ligeglad med hvilken type quotes man bruger (altså '
> eller "). Du kan vist også udelade dem helt!

Prøv lige at køre følgende program. 

#!/usr/bin/perl

print "a\n";
print 'a\n';

print "\n"; # Flush STDOUT

Du får problemer med Perl >= 5.6
(ikke helt sikker på versionnummeret) hvis du undlader "quotes" på strenge. 

Man kan eventuelt også bruge File::Basename hvis man ønsker at lave
ordenlig kode.....


> 
> Anyway: Du styrer backslashes i strenge ved at "escape" dem med et
> backslash foran. Dvs:
> $sti = "C:\\data\\filnavn.ext";
> 
> Hvis du i dit eksempel havde printet $sti, ville f'et slet ikke være
> der, da \f er et form-feed.
> 
> Så skulle det virke. :-)
> 
> Hvis du skal søge efter et backslash i en regexp, så er det på samme
> måde. F.eks. $filnavn =~ /\\([\w]+\.\w{3,3})$/;
> 
> Det er nok en god idé med dollartegnet til sidst (det indikerer et match
> på slutningen af strengen). Ellers risikerer du bare at få et match på
> navnet på et underbibliotek.
> 
> M.v.h.
> Morten
> 
> 
> > -----Original Message-----
> > From: Peter Makholm [mailto:sslug@sslug
> > Sent: Saturday, February 09, 2002 17:24
> > To: sslug@sslug
> > Subject: Re: [PERL] Regular Expressions
> > 
> > "Christian Wix" <sslug@sslug> writes:
> > 
> > > $sti = "C:\data\filnavn.ext"
> > 
> > Brug enkelte quotes.
> > 
> > --
> > Når folk spørger mig, om jeg er nørd, bliver jeg altid ilde til mode
> > og svarer lidt undskyldende: "Nej, jeg bruger RedHat".
> >                                 -- Allan Olesen på dk.edb.system.unix
> 
> 
> 

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