Initial Kohana install
[speedfreak] / Server / 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 }