El Operador de Binding

Normalmente, con las expresiones regulares se usa El operador de binding =˜ , el cuál nos permite ''asociar'' la variable con la operación de casamiento/sustitución sobre la expresión regular:

if ($d =~ /esto/) { print "la palabra 'esto' aparece en: $d\n" }

Si se omiten el operador =~ y la variable entonces se usa la variable por defecto $_:

pp2@nereida:~/doc/2005_2006$ perl -wde 0
main::(-e:1):   0
  DB<1> $_ = '-3.2'
  DB<2> print "yes" if /\d+\.?\d*/ # igual que $_ =~ /\d+\.?\d*/ 
yes
  DB<3> print "yes" if /^\d+\.?\d*$/ # No casa. $_ empieza por '-'
  DB<4> print "yes" if /^-?\d+\.?\d*$/
yes