Retirer l'extension d'une chaîne de caractère

<?php
function remExt($str){ 
    if(strrpos($str, ".")===false) return $str;
    else return substr($str, 0, strrpos($str, "."));
}

$str = "fichier.A.tester.ext";
echo remExt($fichier); 

Retourne:

fichier.A.tester
^