Instruction if d'apres la fin d'une variable ?

Sameline wrote:

Bonjour,

est il possible de definir une instruction if qui
s'execute si la valeur d'une variable ce termine par un $ ?

style :

$test = "poterie"
$test = "poterie$"

le second (poterie$) declenche les commandes declare par le if

merci d'avance
Bonjour,

Pourquoi pas :

#!/usr/bin/perl
use warnings;
use strict;
my @list=("poterie","poterie$","pote$rie");
foreach (@list){
if(/$$/) {
print " Trouvé $_ n";
}
}

ce qui donne

Trouvé poterie$

Cordialement,

--
Dr. POINTIN Yves B.
perl -e "$_='.frontermpclv-bunigc.@optinoinY.P';1 while
s/(.{3})(.{3})?/$_{$2}=$1,$2/e; ; print while $_=$_{$_};"