- Original Message -
MIME-Version: 1.0
Content-Type: multipart/alternative;
boundary="_=_NextPart_001_01C5C99A.9531A0CC"
Subject: RE: Extracting Upper case letter from a variable
Date: Wed, 5 Oct 2005 12:50:21 +0200
Message-ID: <[EMAIL PROTECTED]>
From
BERTHOLD Jean
Cc : Muthukumar; beginners@perl.org
Objet : RE: Extracting Upper case letter from a variable
On Oct 5, BERTHOLD Jean said:
> The part I want to extract is only composed of characters in uppercase.
To be safe (in case there are other uppercase characters) you want to get
upp
On Oct 5, BERTHOLD Jean said:
The part I want to extract is only composed of characters in uppercase.
To be safe (in case there are other uppercase characters) you want to get
uppercase characters between '_' and '-'.
( $ORACLE_SID ) = ( $basename =~ /[A-Z]*/ ) ; <-- I tried that but th
AMGT] #
> I would like to have something like:
> --
> Nom du fichier: rman_APPEOS-archivelog-05-10-05-0100.log
> Instance Oracle: APPEOS
> Thanks for your help !
> Jean
>
> -Message d'origine-
> *De :* Muthuk
--
Nom du fichier: rman_APPEOS-archivelog-05-10-05-0100.log
Instance Oracle: APPEOS
Thanks for your help !
Jean
-Message d'origine-
De : Muthukumar [mailto:[EMAIL PROTECTED]
Envoyé : mercredi, 5. octobre 2005 12:21
À : BERTHOLD Jean
Cc :
You have to try as,
$var=~operation;
Example:
# perl -e '$var="HIbyeok";$var=~s/HI/OK/;printf $var . "\n";'
OKbyeok
-Muthu
On 10/5/05, BERTHOLD Jean <[EMAIL PROTECTED]> wrote:
>
> Hello,
>
> I try to replace my old shells scripts with perl ...
>
> Can you tell me how to extract a substring in