Something

        if ($command == ":!stats")
        {
        	if (stristr($ex[4], '-e') == TRUE) {
        		$flag = e; } 
				 else { $flag = l; } 
				 if ($flag === "e") { $rsname = $ex[5]; } else { $rsname = $ex[4]; }
        fputs($socket, "PRIVMSG " . $ex[2] .' :' . stats($rsname, $flag, 10, "04") . "\n");
        }

function stats($rs2player, $type, $co1, $co2)
{
    if ($rs2player == "$null")
    {
        return "U need to specify a RSN";
    }
    else
    {
        if ($type == "l")
        {
            $c1 = "\003";
            $c1 .= $co1;
            $c2 = "\003";
            $c2 .= $co2;
            $link = "http://hiscore.runescape.com/hiscorepersonal.ws?user1=";
            $link .= $rs2player;
            $data = file_get_contents($link);
            preg_match_all('/">\n(.+)\n<\/a><\/td>\n<td align="right">(.+)<\/td>\n<td align="right">(.+)<\/td>\n<td align="right">(.+)<\/td>\n<\/tr>/i',
                $data, $matches);
            for ($x = 0; $x < count($matches[0]); $x++)
            {
                $skill = $matches[1][$x];
                $rank = $matches[2][$x];
                $level = $matches[3][$x];
                $exp = $matches[4][$x];
                $sline .= $c1 . $skill . " " . $c2 . $level . " ";
            }
            return $sline;
            unset($sline);
        }
        elseif ($type == "e")
        {
            $c1 = "\003";
            $c1 .= $co1;
            $c2 = "\003";
            $c2 .= $co2;
            $link = "http://hiscore.runescape.com/hiscorepersonal.ws?user1=";
            $link .= $rs2player;
            $data = file_get_contents($link);
            preg_match_all('/">\n(.+)\n<\/a><\/td>\n<td align="right">(.+)<\/td>\n<td align="right">(.+)<\/td>\n<td align="right">(.+)<\/td>\n<\/tr>/i',
                $data, $matches);
            for ($x = 0; $x < count($matches[0]); $x++)
            {
                $skill = $matches[1][$x];
                $rank = $matches[2][$x];
                $level = $matches[3][$x];
                $exp = $matches[4][$x];
                $sline .= $c1 . $skill . " " . $c2 . $exp . " ";
            }
            return $sline;
            unset($sline);
        }
    }
}