Evitar que mi código muestre las extensiones de los archivos

[netkuup]

Tengo este código mediante el cual hago una lista de todas las imagenes que hay dentro de la carpeta "imagenes":

Código PHP:

  <? 
$i = 1; 
if($gestor=opendir('imagenes'))  
 {  
     while (($archivo=readdir($gestor))!==false)  
     {  
      if (($archivo!='.')and($archivo!='..')) { 
          echo "&imagen".$i."=".$archivo; 
          $i++; 
          } 
     }  
     echo "&numero_imagenes=".($i-1); 
     closedir($gestor);  
 }   
 ?>   

El problema es que también me muestra su extensión, ej:
imagen1=casa.png&imagen2=arbol.png....
Y me gustaria que saliera así:
imagen1=casa&imagen2=arbol....

Como puedo evitar que salgan las extensiones?

Gracias.

[Vun]

Prueba con stristr($imagen, '.', true) en vez de $imagen, te devuelve lo que haya antes del primer punto, aunque claro..... como haya mas de un punto en el nombre del archivo....

[netkuup]

No tengo ninguna variable llamada $imagen, la variable que se imprime es $archivo, porqué quiero que el texto se me muestre asi:

&imagen1=casa.png&imagen2=arbol.png&imagen3=lapiz. png

Pero sin las extensiones ".png".

He provado esto:

stristr($archivo, '.', true);

Pero entonces me devuelve esto:

&imagen1=.png&imagen2=.png&imagen3=.png

Tendria de ser esa misma funcion pero que borrara del punto hacia el otro lado (incluido el punto), como se puede hacer?

Gracias.

[netkuup]

perdón, estuve mirando, y es culpa mia:

Haver:
stristr($archivo, '.', true);
Me dava error, y yo tan ancho le quité el true y funcionava:
stristr($archivo, '.');
Pero he estado mirando, y si se quita el true lee el texto hacia otro lado.

Con el true sirve para PHP 5.3, y yo tengo la version 5.2.

Hay algun codigo para versiones mas antiguas? Gracias.

[netkuup]

Ya está, ya lo encontré, gracias:

echo substr ($archivo, 0, strpos ($archivo, "."));

[Vun]

Muy buena, no habia pensado en esa posibilidad, te iba a decir usando explode(), saludos