Select Code to Download

sub casa_ruta
{
...
        return 0;
}

sub casa_ruta
{
...
        }
        return 0;
}

  DB<1> c 152
... #my script output here
...
  DB<7> p "$r" =~ /$ruta/

  DB<8>