system/core/utf8/ltrim.php

   1 <?php defined('SYSPATH') OR die('No direct access allowed.');
   2 /**
   3  * utf8::ltrim
   4  *
   5  * @package    Core
   6  * @author     Kohana Team
   7  * @copyright  (c) 2007 Kohana Team
   8  * @copyright  (c) 2005 Harry Fuecks
   9  * @license    http://www.gnu.org/licenses/old-licenses/lgpl-2.1.txt
  10  */
  11 function _ltrim($str, $charlist = NULL)
  12 {
  13         if ($charlist === NULL)
  14                 return ltrim($str);
  15
  16         if (utf8::is_ascii($charlist))
  17                 return ltrim($str, $charlist);
  18
  19         $charlist = preg_replace('#[-\[\]:\\\\^/]#', '\\\\$0', $charlist);
  20
  21         return preg_replace('/^['.$charlist.']+/u', '', $str);
  22 }