@array = ("12 hours", "23 minutes", "17 seconds");

##</code><code>##

$last = pop(@array);
$sentence = join ", ", @array;
$sentence .= "," if ($#array > 0);
$sentence .= " and " if ($#array > -1);
$sentence .= "$last";