sono nuovissimo del perl, 2 giorni, quindi chiedo già perdono per la caz.. che sto per chiedere

ho una variabile string $path e vorrei trovare il primo \ dalla fine, io ho fatto così:

for ( $pos=length( $Path ); $pos>0; $pos-- ) {
if ( $Path[pos] eq "\\" ) {
...

giusto?????