したらばTOP ■掲示板に戻る■ 全部 1-100 最新50 | |

プログラムスレッド

141：女傑 ◆nDpXSJz8i.：2013/03/04(月) 00:42:20
$_SERVER['PATH_INFO']<FilesMatch "^path_info$">
ForceType application/x-httpd-php
</FilesMatch><?php
$query = getenv ("PATH_INFO");
$var = split ("[/\.]", $query);
echo "引数は「$var[1]」と「$var[2]」です。";
?>
142：女傑 ◆nDpXSJz8i.：2013/03/04(月) 01:00:35
($value0, $value1) = $ENV{'PATH_INFO'} =~ m!/([^/]+)/([^/]+)/?!;

143：女傑：2013/03/04(月) 12:49:10
<?php
$query = $_SERVER['PATH_INFO'];
$var = split ("[/\.]", $query);
echo "引数は「$var[1]」と「$var[2]」です。";
?>

144：女傑 ◆nDpXSJz8i.：2013/03/04(月) 21:40:31
if($email =~ /^[^@]+@[^.]+\..+/){
print '正しいかも';
}else{
print '違うかも';
}

145：女傑：2013/03/05(火) 17:38:49
$url =~ s/(https?|ftp|gopher|telnet|whois|news):([\w|\:\!\#\$\%\=\&\-\^\`\\\|\@\~\[\{\]\}\;\+\*\,\.\?\/]+)/<a href=\"$1\:$2\" target=\"_blank\">$1\:$2<\/a>/g;

$mes =~ s/.{160}/$&<BR>\n/g;
if ($email =~ /\s|\,/) { &error('エラー','Ｅメールを正しくご記入ください.'); }
if ($email !~ /^[^@]+@[^.]+\..+/) {
&error("メールアドレスの書式に誤りがあります。");
}

if ($mes !~ /[\x81-\x9F\xE0-\xFC][\x40-\x7E\x80-\xFC]/) {
&error("メッセージに日本語が含まれていません");
}
$email =~ s/(^[^@]+@[^.]+\..+)/<a href=\"mailto\:$1\" target=\"_blank\">$1<\/a>/g;
##$email =~ s/(^[^@]+@[^.]+\..+)/<a href=\"mailto\:$1\" target=\"_blank\">$1<\/a>/g;
##$email =~ s/([-\w.]|[\s\!\"\#\$\%\&\'\(\)\*\+\,\-\.\/\:\;\<\?\@\[\\\]\^\_\`\{\|\}\~])/'&#'.unpack('C2',$1).';'/eg; # エンティティコード化

146：女傑：2013/03/05(火) 18:51:30
#■ URLDownloadToFileを使用します。


# #include <urlmon.h> // ヘッダーファイルを指定


# char szURL[128];
# char szHtml[128];

# strcpy(szURL, "http://www.hoge.com/main.htm&quot;);
# strcpy(szHtml, "C:\\TEST\\main.htm");
# URLDownloadToFile(NULL, szURL, szHtml, 0, NULL

147：女傑：2013/03/06(水) 10:07:29
while (list($data1, $data2) each($data))
{ echo "data1:data2"; }
foreach ($data as $data1 => $data2)
{ echo "data1:data2"; }
$max = count($youso);
for ($i=0;$i<$max;$i++)
{ echo "$i:$youso[$i]"}

148：女傑：2013/03/06(水) 10:20:02
if (array_key_exists('1着', array_count_values($array2))) {
echo "この配列には 'first' という要素が存在します";
}
else { echo "この配列には 'first' という要素が存在しません"; }

149：女傑 ◆nDpXSJz8i.：2013/03/06(水) 13:58:36
<?php
echo "test1.jpg:<br>\n";
$exif = exif_read_data('tests/test1.jpg', 'IFD0');
echo $exif===false ? "No header data found.<br>\n" : "Image contains headers<br />\n";

$exif = exif_read_data('tests/test2.jpg', 0, true);
echo "test2.jpg:<br>\n";
foreach ($exif as $key => $section) {
foreach ($section as $name => $val) {
echo "$key.$name: $val<br>\n";
}
}
?>

150：女傑：2013/03/06(水) 16:08:19
$a = 0;
while ($a < 10)
{
print "繰り返し処理<BR>";
$a++;

if ($a >= 5) { last; }

}
$a = 0;
while ($a < 10)
{
print "繰り返し処理<BR>";
$a++;
}
open (IN,"test.txt");
while (<IN>)
{
print $_;
}
close (IN);

151：女傑：2013/03/06(水) 16:19:21
sub datafiles
{
local %table;
local($fname, $kazu, $i);
local($name, $val);

$fname = $_[0];
$_[0] =~ s/\n//g;

open FILE, "< $fname";
@lines = <FILE>;
$kazu = @lines;

# for ($i=0;$i<$kazu;$i++) {
# foreach $line (@lines) {
$i = 0;
while ($i < $kazu) {
chomp $_;
($name, $val) = split(',', $lines[$i], 2);
# ($name, $val) = split(',', $line, 2);
if ($name ne "") {
$table{$name} = $val;
}
$i++;
if ($i >= $kazu) { last; }
}

close FILE;
return %table;
}

152：女傑さん ◆nDpXSJz8i.：2013/03/06(水) 20:19:41
#include <windows.h>
int PASCAL WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
HANDLE Mutex = CreateMutex(NULL, false, "Mutex");
if (Mutex == NULL) return 0;
if ( GetLastError() == ERROR_ALREADY_EXISTS){
return 0;
}
{
MessageBox(0, "Hello, World!", "Welcome", MB_OK);
return 0;
}
}

153：女傑 ◆nDpXSJz8i.：2013/03/07(木) 19:59:50
if ( $sample =~ /女傑/ ) {
print '変数に文字列 "女傑"は含まれています。' ;
} else {
print '変数に文字列 "女傑"は含まれていません。' ;

154：女傑 ◆nDpXSJz8i.：2013/03/07(木) 20:25:32
&jcode'convert(*name,'sjis');
&jcode'convert(*value,'sjis');

$value =~ s/&/&/g;
$value =~ s/"/"/g;
$value =~ s/</</g;
$value =~ s/>/>/g;

$value =~ s/\r\n/\0/g;
$value =~ s/\r/\0/g;
$value =~ s/\f//g;
$value =~ s/\t//g;

155：女傑 ◆nDpXSJz8i.：2013/03/08(金) 14:01:06
if ( $sample =~ /hello/ ) {
print '変数に文字列 "hello"は含まれています。' ;
} else {
print '変数に文字列 "hello"は含まれていません。' ;
} if (/hello/ ) {
print '特殊変数 $_に文字列 "hello"は含まれています。' ;
} else {
print '特殊変数 $_に文字列 "hello"は含まれていません。' ;

156：女傑 ◆nDpXSJz8i.：2013/03/08(金) 20:54:36
<html>
<head><title></title></head>
<body>
<?php
$moji = "test script";
if(ereg("[a-z]{6}", $moji, $result)){
print_r($result);
}
?>
</body>
</html>

157：女傑 ◆nDpXSJz8i.：2013/03/08(金) 21:50:27
# $bun = jcode($name)->h2z->euc;
my ($icode, $nmatch) = Jcode::getcode($name);
$bun = Jcode::convert("$name", "utf8", $icode, "z2h");
# $bun = Unicode::Japanese->new($bun, $icode)->z2hKana->utf8;
if ("$bun" ne "") {
chomp($bun) if $bun =~ /\n$/;

$bun =~ s/.{160}/$&<BR>\n/g;

158：女傑 ◆nDpXSJz8i.：2013/03/09(土) 15:38:49

if ( m/^(\d+) (\d+)\r\n$/ ){

159：女傑 ◆nDpXSJz8i.：2013/03/11(月) 00:26:47
2009年08月25日09時00分
rtc.startTime = "1251158400"

VMware Tools によるホストとの時刻同期を停止するには次の設定も必要。

tools.syncTime = "FALSE"
time.synchronize.continue = "FALSE"
time.synchronize.restore = "FALSE"
time.synchronize.resume.disk = "FALSE"
time.synchronize.shrink = "FALSE"
time.synchronize.tools.startup = "FALSE"

SMBIOS.reflectHost Edit

物理マシンのOEMID（製造元とモデル名）を仮想マシンに認識させるかどうかを指定します。
通常、仮想マシンのOEMIDは、製造元が"VMware, Inc."モデルが"VMware Virtual Platform"となっています。
OEMIDはmsinfo32.exeで確認することができます。

TRUE
FALSE

のいずれかを指定します。

160：女傑さん ◆nDpXSJz8i.：2013/03/11(月) 10:34:53
<?php
$string = 'April 15, 2003';
$pattern = '/(\w+) (\d+), (\d+)/i';
$replacement = '${1}1,$3';
echo preg_replace($pattern, $replacement, $string);
?>
<?php
$string = 'The quick brown fox jumped over the lazy dog.';
$patterns = array();
$patterns[0] = '/quick/';
$patterns[1] = '/brown/';
$patterns[2] = '/fox/';
$replacements = array();
$replacements[2] = 'bear';
$replacements[1] = 'black';
$replacements[0] = 'slow';
echo preg_replace($patterns, $replacements, $string);
?>
<?php
ksort($patterns);
ksort($replacements);
echo preg_replace($patterns, $replacements, $string);
?>
<?php
$patterns = array ('/(19|20)(\d{2})-(\d{1,2})-(\d{1,2})/',
'/^\s*{(\w+)}\s*=/');
$replace = array ('\3/\4/\1\2', '$\1 =');
echo preg_replace($patterns, $replace, '{startDate} = 1999-5-27');
?>
<?php
$str = 'foo o';
$str = preg_replace('/\s\s+/', ' ', $str);
// This will be 'foo o' now
echo $str;
?>
<?php
$count = 0;

echo preg_replace(array('/\d/', '/\s/'), '*', 'xp 4 to', -1 , $count);
echo $count; //3
?>

161：女傑さん ◆nDpXSJz8i.：2013/03/11(月) 10:35:53
<?php
$string = 'XYZ';
if (eregi('z', $string)) {
echo "'$string' は、'z' または 'Z' を含んでいます!";
}
?>
<?php
$subject = "abcdef";
$pattern = '/^def/';
preg_match($pattern, substr($subject,3), $matches, PREG_OFFSET_CAPTURE);
print_r($matches);
?>

162：女傑さん ◆nDpXSJz8i.：2013/03/11(月) 14:20:24
string mb_convert_kana ( string $str [, string $option = "KV" [, string $encoding ]] )

r

「全角」英字を「半角」に変換します。



R

「半角」英字を「全角」に変換します。



n

「全角」数字を「半角」に変換します。



N

「半角」数字を「全角」に変換します。



a

「全角」英数字を「半角」に変換します。



A

「半角」英数字を「全角」に変換します （"a", "A" オプションに含まれる文字は、U+0022, U+0027, U+005C, U+007Eを除く U+0021 - U+007E の範囲です）。



s

「全角」スペースを「半角」に変換します（U+3000 -> U+0020）。



S

「半角」スペースを「全角」に変換します（U+0020 -> U+3000）。



k

「全角カタカナ」を「半角カタカナ」に変換します。



K

「半角カタカナ」を「全角カタカナ」に変換します。



h

「全角ひらがな」を「半角カタカナ」に変換します。



H

「半角カタカナ」を「全角ひらがな」に変換します。



c

「全角カタカナ」を「全角ひらがな」に変換します。



C

「全角ひらがな」を「全角カタカナ」に変換します。



V

濁点付きの文字を一文字に変換します。"K", "H" と共に使用します。

163：女傑 ◆nDpXSJz8i.：2013/03/11(月) 16:18:14
echo mb_ereg_replace('[^a-zA-Z]', '', 'LOOX T70H');

164：女傑 ◆nDpXSJz8i.：2013/03/11(月) 16:22:06
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0//EN">
<html xmlns="http://www.w3.org/1999/xhtml&quot; xml:lang="ja" lang="ja">
<head>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html;CHARSET=Shift_JIS">
<title>芥川龍之介賞&nbsp;受賞者データベース</title>
</head><body bgcolor=#ffffff>
<?php
/*
mb_関数が使えない場合はhttp://www.spencernetwork.org/にて漢字コード変換(簡易版)を入手する事
*/

if (file_exists("jcode-LE.php")) require_once("jcode-LE.php");

// 内部文字列文字化け対策
if (function_exists("mb_internal_encoding")) {
mb_internal_encoding("SJIS");
mb_language("Japanese");
}

/*
QUERY受信(POST対応)
htmlspecialchars関数にて、タグ処理を実現
*/

if (isset($_POST["q"]) and !empty($_POST["q"])) { $qry = htmlspecialchars($_POST["q"], ENT_QUOTES); }
elseif (isset($_GET["q"]) and !empty($_GET["q"])) { $qry = htmlspecialchars($_GET["q"], ENT_QUOTES); }
else { $qry = htmlspecialchars($_SERVER['QUERY_STRING'], ENT_QUOTES); }

// QUERYが空白の場合
if (empty($qry))
{
echo "<h5>QUERYがありません</h5>";
echo "</body></html>";
exit;
}

// QUERYのマッチング
$qry = substr($qry,0,32);
$qry = mb_convert_kana($qry, "KRNH");


// QUERYの文字コード統一
if (get_magic_quotes_gpc()) {
$qry = stripslashes($qry);
$qry = mb_convert_encoding($qry,"sjis","JIS, sjis-win, eucjp-win, utf-8");
}
$wid = "$qry";

/*
preg_match("^[ァ-ヶ]+$",$qry))
preg_match("^[ぁ-ん]+$",$qry))
preg_match("/^[A-Za-z0-9]{12}/i", "$qry"))
*/

// QUERYのサニタイズ処理
$wid = str_replace(">",">",$wid);
$wid = str_replace("<","<",$wid);
$wid = str_replace("\r\n", "\r",$wid);
$wid = str_replace("\r", "\n",$wid);
$wid = preg_replace("/\n{2,}/", "\n\n", $wid);
$wid = str_replace("\n", "<br>", $wid);

165：女傑 ◆nDpXSJz8i.：2013/03/11(月) 16:22:57
// MySQLに接続する。
$host = "localhost";
$id = "";
$password = "";

if( $res_dbcon = mysql_connect( $host, $id, $password) ){
echo "★☆★☆MySQL接続が正常に開始しました。★☆★☆<br><hr>";
}
else{
echo "★☆★☆残念なことに、MySQL接続が失敗しました。★☆★☆<br><hr>";
}

// 文字コードを変換する
mysql_query("SET NAMES sjis");

// MySQL 読み込み。
$dbname = "bungaku";
mysql_select_db("$id");

//テーブルがあるかどうか 0=なし 1=あり
function table_exist($dbname){
$result = mysql_call("show tables like '$dbname'");
if(!$result){return 0;}
$a = mysql_fetch_row($result);
mysql_free_result($result);
return $a;
}

$result = mysql_query("SELECT kai, nendo, myoji, namae, sakuhin, shozoku FROM $dbname WHERE sakusya='$wid' or kai='$wid' or nendo='$wid' or myoji='$wid' or sakuhin='$wid' or namae='$wid'");
$num_rows = mysql_num_rows($result);
$allkazu = $num_rows;

// 項目を配列に入れる
$koumoku = array(
"0" => "受賞回",
"1" => "受賞年度",
"2" => "受賞者氏名",
"3" => "受賞作品",
"4" => "掲載雑誌",
);

/*
for ($i = 0 ; $i < mysql_num_rows($result) ; $i++){
$row = mysql_fetch_array($result, NULL, PGSQL_ASSOC);
}

if (result <= 0):
echo "結果がありません。";
endif;

while ($row = mysql_fetch_array($result, MYSQL_ASSOC)) {
*/

// 検索結果を出力する
for ($i=0;$i < mysql_num_rows($result); $i++){
$row = mysql_fetch_array($result,MYSQL_ASSOC);

166：女傑 ◆nDpXSJz8i.：2013/03/11(月) 16:23:48
echo <<<EOF

$koumoku[0]:第$row[kai]回<br>
$koumoku[1]:$row[nendo]年度<br>
$koumoku[2]:$row[myoji]$row[namae]さん<br>
$koumoku[3]:$row[sakuhin]<br>
$koumoku[4]:$row[shozoku]<br>
<img src="https://chart.googleapis.com/chart?chs=120x120&amp;cht=qr&amp;chl=$row[sakuhin]&choe=Shift_JIS&chld=L|1\">
<br>
<table border="1" width="1000" cellspacing="0" cellpadding="5" bordercolor="#333333">
<tr>
<th bgcolor="#EE0000"><font color="#FFFFFF" width="200">$koumoku[0]</font></th>
<th bgcolor="#EE0000" width="200"><font color="#FFFFFF">$koumoku[1]</font></th>
<th bgcolor="#EE0000" width="500"><font color="#FFFFFF">$koumoku[2]</font></th>
<th bgcolor="#EE0000" width="1000"><font color="#FFFFFF">$koumoku[3]</font></th>
<th bgcolor="#EE0000" width="300"><font color="#FFFFFF">$koumoku[4]</font></th>
</tr>
<tr>
<td bgcolor="#FFBBFF" align="left" width="200" nowrap>$row[kai]</td>
<td bgcolor="#87cefa" valign="left" width="200">$row[nendo]</td>
<td bgcolor="#ff7f50" valign="left" width="500">$row[myoji]$row[namae]</td>
<td bgcolor="#90EE90" valign="left" width="1000">$row[sakuhin]</td>
<td bgcolor="#EEEE00" valign="left" width="300">$row[shozoku]</td>
</tr>
</table>
<hr>
EOF;
}
if ($allkazu < 1) {
echo <<<EOF
<font>検索の結果、何も見つかりませんでした。</font>
EOF;
} else {
echo "検索の結果、全部で" . $allkazu . "作品見つかりました。";
}

// 出力する結果がなくなれば終了
if(!$result){break;}

// 出力された結果を開放する。
mysql_free_result($result);

// MySQLを閉じる。
//mysql_close($res_dbcon);
$close_flag = mysql_close($res_dbcon);

if ($close_flag){
print('<br>★☆★☆MySQL接続が正常に終了しました。★☆★☆<br>');
}
else{
echo "★☆★☆残念なことに、MySQL接続が正常に終了できませんでした。★☆★☆<br><hr>";
}
?>
</body></html>

167：女傑 ◆nDpXSJz8i.：2013/03/11(月) 16:38:28
$wid = str_replace("/^[ａ-ｚＡ-Ｚ０-９]+$/","/^[a-zA-Z0-9]+$/",$wid);

168：女傑 ◆nDpXSJz8i.：2013/03/11(月) 16:49:09
$qry = str_replace("/^[a-zA-Z0-9ァ-ヶぁ-ん一-龠]+$/","/^[a-zA-Z0-9ァ-ヶぁ-ん一-龠]+$/",$qry);

169：女傑 ◆nDpXSJz8i.：2013/03/11(月) 22:53:35
<?php
$array = array(1,2,3,4);
$hit = array_search(1,$array);
if ($hit !== FALSE){
echo "1は\$array内に存在します";
}
?>

170：女傑 ◆nDpXSJz8i.：2013/03/11(月) 23:16:16
if (/Windows 98|Win98/i) { $name = "Windows 98"; }
171：女傑 ◆nDpXSJz8i.：2013/03/11(月) 23:25:13
$ip = $ENV{'REMOTE_ADDR'};
$host =~ /^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/
$ip =~ s/(\d+)\.(\d+)\.(\d+)\.(\d+)/$1.***.***.***/;

172：女傑 ◆nDpXSJz8i.：2013/03/11(月) 23:27:06
$filenaiyou = join("",$array);

173：女傑 ◆nDpXSJz8i.：2013/03/11(月) 23:33:10
$dbconn = pg_connect("port=5432 user= password= dbname=");

$sql = "SELECT product_no, product_name, price FROM products WHERE product_name = $1";

$result = pg_query_params($dbconn, $sql, array($_POST['product_name']));


$cnt = pg_numrows($result);
print("$cnt 件ヒットしました。<br />");

for ($i = 0; $i < $cnt; $i++) {

$row = pg_fetch_row($result, $i);
print("product_no：$row[0] product_name：$row[1] price：$row[2]");
}


pg_close($dbconn);

174：女傑 ◆nDpXSJz8i.：2013/03/11(月) 23:35:26
/[-!#$%&\'*+\\.\/0-9_`a-z{|}~]+@[-a-z0-9_]+\.[-a-z0-9_\\.]+/i

175：女傑 ◆nDpXSJz8i.：2013/03/11(月) 23:38:55
my %hoge;
$hoge{aaa} = '1';


if (exists $hoge{aaa}) {
# 値が存在するので表示されます
print "aaa exists\n";
}

176：女傑 ◆nDpXSJz8i.：2013/03/11(月) 23:54:59


例1 array_keys() の例
<?php
$array = array(0 => 100, "color" => "red");
print_r(array_keys($array));

$array = array("blue", "red", "green", "blue", "blue");
print_r(array_keys($array, "blue"));

$array = array("color" => array("blue", "red", "green"),
"size" => array("small", "medium", "large"));
print_r(array_keys($array));
?>

上の例の出力は以下となります。

Array
(
[0] => 0
[1] => color
)
Array
(
[0] => 0
[1] => 3
[2] => 4
)
Array
(
[0] => color
[1] => size
)

177：女傑 ◆nDpXSJz8i.：2013/03/12(火) 00:24:51
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0//EN">
<html xmlns="http://www.w3.org/1999/xhtml&quot; xml:lang="ja" lang="ja">
<head><title>テスト</title>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html;CHARSET=euc-jp">
<body>
<?php
$thisphp="asahi.php";
$page_line_num=5;#１つのページに表示させたい件数
if(!$page_num= htmlspecialchars($_GET["page"], ENT_QUOTES)){$page_num=1;}#最初は１ページ目とする

$page_num = rtrim($page_num);
$page_num = ltrim($page_num);
$page_num = str_replace(">",">",$page_num);
$page_num = str_replace("<","<",$page_num);
$page_num = str_replace("\r\n", "\r",$page_num);
$page_num = str_replace("\r", "\n",$page_num);
$page_num = preg_replace("/\n{2,}/", "\n\n", $page_num);
$page_num = str_replace("\n", "<br>", $page_num);
//I, II, III
$array=array('サラ2歳新馬','東京スポーツ杯2歳ステークス','朝日杯フューチュリティステークス','報知杯弥生賞','皐月賞','東京優駿（日本ダービー）','嵐山ステークス','菊花賞','有馬記念');
$array2=array('1着','3着','2着','4着','1着','1着','3着','1着','3着');
$array3=array(4,1,3,1);
$array4=array('新馬戦','GIII','GI','JPN-II','GI','GI','OP','GI','GI');
$array5=array('サラ2歳混合指定・馬齢','サラ2歳国際指定・馬齢','サラ2歳国際指定・馬齢','サラ3歳牡牝国際指定・馬齢','サラ3歳牡牝国際指定・定量','サラ3歳牡牝国際指定・定量','サラ3歳以上牡牝国際特別・別定','サラ3歳牡牝国際指定・定量','サラ3歳以上牡牝国際指定・馬齢');
$page_array=array_slice($array,($page_num-1)*$page_line_num,$page_line_num);#表示する分だけ別の配列に格納する 配列は０から数えるので処理上は１ページ目は０ページ目とする
$page_array2=array_slice($array2,($page_num-1)*$page_line_num,$page_line_num);
$page_array4=array_slice($array4,($page_num-1)*$page_line_num,$page_line_num);
$page_array5=array_slice($array5,($page_num-1)*$page_line_num,$page_line_num);
$allkazu = count($array);
//print_r($page_array);#現在のページで表示される中身を確認
if (1 > $page_num) {
echo <<<EOF
<font>ページが見つかりません</font>
</body></html>
EOF;
exit;
}

178：女傑 ◆nDpXSJz8i.：2013/03/12(火) 00:25:26
$kazu = count($page_array);
$i=0;
for ($i = 0; $i < $kazu; $i++) {
$bango = $i+1+$page_line_num*$page_num-1-$page_line_num+1;
{
echo <<<EOF
$bango:$page_array[$i]&nbsp;$page_array2[$i]<br>
EOF;
}
echo "\n";
}
print_r(array_keys($array2, "1着"));print_r(array_keys($array2, "2着"));$kazu1 = count(array_keys($array2, "1着"));$kazu2 = count(array_keys($array2, "2着"));
$next_page=$page_num+1;#次のページ
$back_page=$page_num-1;#前のページ

if($back_page >= 1){$back_str='<a href="'.$thisphp.'?page='.$back_page.'">前へ</a>';}#現在より前のページが存在すれば戻るリンクを作る
else{$back_str='<span style="color:gray">前へ</span>';}#存在しなければグレイ色で薄く表示
if(count($array) > ($next_page-1)*$page_line_num){$next_str='<a href="'.$thisphp.'?page='.$next_page.'">次へ</a>';}#現在より後のページが存在すれば進むリンクを作る
else{$next_str='<span style="color:gray">次へ</span>';}

//$all_page_num=count($array) / ($page_line_num-1);#全部のページ数を計算
$all_page_num=count($array) / ($page_line_num-1);#全部のページ数を計算
//ceil
$kiriage = ceil($all_page_num); $kir = $kiriage-1;
for($i=1;$i<$kiriage;$i++){#存在するページ番号を生成
if($i != $page_num){$page_str.='[<a href="'.$thisphp.'?page='.$i.'">'.$i.'</a>]';}
else{$page_str.='[<span style="color:gray">'.$i.'</span>]';}
}
//$soupage = floor($all_page_num); // 切捨て
$array_lowercase = array_map('strtolower', $array2);
$array4 = array_multisort($array_lowercase, SORT_ASC, SORT_NUMERIC, $array2);
//print_r(array_count_values($array2));
$zensei = "{$array3['0']}-{$array3['1']}-{$array3['2']}-{$array3['3']}";
$sen = "戦";
$shou = "勝";
$icchaku = $kazu1;
$shoritu = $kazu1/$allkazu;
$shoritu = round($shoritu, 3);
$rentai = (($kazu1)+($kazu2))/$allkazu;
$rentai = round($rentai, 3);

179：女傑 ◆nDpXSJz8i.：2013/03/12(火) 00:25:56
if ($all_page_num < $page_num) {
echo <<<EOF
<font>ページが見つかりません</font>
</body></html>
EOF;
exit;
}
if ($rentai != 1){
$rentai = sprintf( "%.3f", $rentai );
$rentai = substr_replace($rentai, "", 0,1);
}
if ($rentai == 1) { $rentai = '1.000'; }
if ($shoritu != 1){
$shoritu = sprintf( "%.3f", $shoritu );
$shoritu = substr_replace($shoritu, "", 0,1);
}
if ($shoritu == 1) { $shoritu = '1.000'; }

echo <<<EOF
<p>$back_str&nbsp;$page_str&nbsp;$next_str</p>
<p>成績$allkazu$sen$icchaku$shou&nbsp;$zensei</p>
<p>勝率$shoritu&nbsp;連対率$rentai</p>
EOF;
$kai = "回";
foreach (array_count_values($array2) as $key => $val) {
echo "$key$val$kai<br>\n";

}
echo <<<EOF
<p>$page_num/$kir</p>
EOF;

?>
</body></html>

180：女傑 ◆nDpXSJz8i.：2013/03/12(火) 09:57:51
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0//EN">
<html xmlns="http://www.w3.org/1999/xhtml&quot; xml:lang="ja" lang="ja">
<head><title>ナリタブライアン</title>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html;CHARSET=Shift_JIS">
<body>
<?php
$thisphp="NaritaBrian.php";
$page_line_num=5;#１つのページに表示させたい件数

if(!$page_num= htmlspecialchars($_GET["page"], ENT_QUOTES)){$page_num=1;}#最初は１ページ目とする
$page_num = floor($page_num); // 切捨て
$page_num = str_replace(">",">",$page_num);
$page_num = str_replace("<","<",$page_num);
$page_num = str_replace("\r\n", "\r",$page_num);
$page_num = str_replace("\r", "\n",$page_num);
$page_num = preg_replace("/\n{2,}/", "\n\n", $page_num);
$page_num = str_replace("\n", "<br>", $page_num);

$array=array('サラ3歳新馬','サラ3歳新馬','函館3歳ステークス','きんもくせい特別','デイリー杯3歳ステークス','京都3歳ステークス','朝日杯3歳ステークス','共同通信杯4歳ステークス','フジテレビ賞スプリングステークス','皐月賞',
'東京優駿','京都新聞杯','菊花賞','有馬記念','阪神大賞典','天皇賞秋','ジャパンカップ','有馬記念','阪神大賞典','天皇賞春','高松宮杯');
$array2=array('2着','1着','6着','1着','3着','1着','1着','1着','1着','1着','1着','2着','1着','1着','1着','12着','6着','4着','1着','2着','4着');
//$array3=array(12,3,1,5);
$array4=array('新馬戦','新馬戦','GIII','500万下','GII','OP','GI','GIII','GII','GI','GI','GII','GI','GI','GII','GI','GI','GI','GII','GI','GI');
$page_array=array_slice($array,($page_num-1)*$page_line_num,$page_line_num);#表示する分だけ別の配列に格納する 配列は０から数えるので処理上は１ページ目は０ページ目とする
$page_array2=array_slice($array2,($page_num-1)*$page_line_num,$page_line_num);
$page_array4=array_slice($array4,($page_num-1)*$page_line_num,$page_line_num);
if (1 > $page_num) {
echo <<<EOF
<font>ページが見つかりません</font>
</body></html>
EOF;
exit;
}

$allkazu = count($array);
//print_r($page_array);#現在のページで表示される中身を確認
$kazu1 = count(array_keys($array2, "1着"));$kazu2 = count(array_keys($array2, "2着"));$kazu3 = count(array_keys($array2, "3着"));$kazu4 = $allkazu-$kazu1-$kazu2-$kazu3;
$kazu = count($page_array);

181：女傑 ◆nDpXSJz8i.：2013/03/12(火) 09:58:21
for ($i = 0; $i < $kazu; $i++) {
$bango = $i+1+$page_line_num*$page_num-1-$page_line_num+1;
{
echo <<<EOF
$bango:$page_array[$i]&nbsp;$page_array4[$i]&nbsp;$page_array2[$i]<br>
EOF;
}
echo "\n";
}

$next_page=$page_num+1;#次のページ
$back_page=$page_num-1;#前のページ

if($back_page >= 1){$back_str='<a href="'.$thisphp.'?page='.$back_page.'">前へ</a>';}#現在より前のページが存在すれば戻るリンクを作る
else{$back_str='<span style="color:gray">前へ</span>';}#存在しなければグレイ色で薄く表示
if(count($array) > ($next_page-1)*$page_line_num){$next_str='<a href="'.$thisphp.'?page='.$next_page.'">次へ</a>';}#現在より後のページが存在すれば進むリンクを作る
else{$next_str='<span style="color:gray">次へ</span>';}

//$all_page_num=count($array) / ($page_line_num-1);#全部のページ数を計算
$all_page_num=count($array) / ($page_line_num);#全部のページ数を計算
//ceil
$pagesuu = ceil($all_page_num); // 切捨て
for($i=1;$i<=$pagesuu;$i++){#存在するページ番号を生成
if($i != $page_num){$page_str.='[<a href="'.$thisphp.'?page='.$i.'">'.$i.'</a>]';}
else{$page_str.='[<span style="color:gray">'.$i.'</span>]';}
}
if ($pagesuu < $page_num) {
echo <<<EOF
<font>ページが見つかりません</font>
</body></html>
EOF;
exit;
}

182：女傑 ◆nDpXSJz8i.：2013/03/12(火) 09:58:52
//$soupage = floor($all_page_num); // 切捨て
$array_lowercase = array_map('strtolower', $array2);
$array4 = array_multisort($array_lowercase, SORT_ASC, SORT_NUMERIC, $array2);
//print_r(array_count_values($array2));
$zensei = "{$kazu1}-{$kazu2}-{$kazu3}-{$kazu4}";
$sen = "戦";
$shou = "勝";
$icchaku = $kazu1;
$shoritu = $kazu1/$allkazu;
$shoritu = round($shoritu, 3);
$rentai = (($kazu1)+($kazu2))/$allkazu;
$rentai = round($rentai, 3);
if ($rentai != 1){
$rentai = sprintf( "%.3f", $rentai );
$rentai = substr_replace($rentai, "", 0,1);
}
if ($rentai == 1) { $rentai = '1.000'; }
if ($shoritu != 1){
$shoritu = sprintf( "%.3f", $shoritu );
$shoritu = substr_replace($shoritu, "", 0,1);
}
if ($shoritu == 1) { $shoritu = '1.000'; }
$data2 = implode(array_count_values($array2));

echo <<<EOF
<p>$back_str&nbsp;$page_str&nbsp;$next_str</p>
<p>成績$allkazu$sen$icchaku$shou&nbsp;$zensei</p>
EOF;
foreach (array_count_values($array2) as $key => $val){ print $key."".$val."回\n";}
echo <<<EOF
<p>勝率$shoritu&nbsp;連対率$rentai</p>
<p>$page_num/$pagesuu</p>
EOF;
?>
</body></html>

183：女傑 ◆nDpXSJz8i.：2013/03/12(火) 10:12:58


例2 each() によって配列を走査する
<?php
$fruit = array('a' => 'apple', 'b' => 'banana', 'c' => 'cranberry');

reset($fruit);
while (list($key, $val) = each($fruit)) {
echo "$key => $val\n";
}
?>

上の例の出力は以下となります。

a => apple
b => banana
c => cranberry


<?php
$transport = array('foot', 'bike', 'car', 'plane');
$mode = current($transport); // $mode = 'foot';
$mode = next($transport); // $mode = 'bike';
$mode = next($transport); // $mode = 'car';
$mode = prev($transport); // $mode = 'bike';
$mode = end($transport); // $mode = 'plane';
?>

184：女傑 ◆nDpXSJz8i.：2013/03/12(火) 10:39:47

<?php
$str = 'hypertext language programming';
$chars = preg_split('/ /', $str, -1, PREG_SPLIT_OFFSET_CAPTURE);
print_r($chars);
?>

<?php
$str = 'one|two|three|four';

// 正の値を持つ limit
print_r(explode('|', $str, 2));

// 負の値を持つ limit (PHP 5.1 以降)
print_r(explode('|', $str, -1));
?>

<?php
// カンマまたは " ", \r, \t, \n , \f などの空白文字で句を分割する。
$keywords = preg_split("/[\s,]+/", "hypertext language, programming");
print_r($keywords);
?>

185：女傑 ◆nDpXSJz8i.：2013/03/12(火) 12:17:09
$array3 = array('サラ2歳新馬' => '1着', '東京スポーツ杯2歳ステークス' => '1着', '朝日杯フューチュリティステークス' => '1着');reset($array3);
while (list($key, $val) = each($array3)) {
echo "$key => $val\n";
}$ka = count(array_keys($array3, "1着"));echo "$ka";

186：女傑さん ◆nDpXSJz8i.：2013/03/12(火) 13:32:57
for (reset($a);$key = key($a);next($a)) {
echo "a[$key]=$a[$key]";
}

187：女傑さん ◆nDpXSJz8i.：2013/03/12(火) 13:38:58
reset($array3);
while (list($key, $val) = each($array3)) {
echo "$key => $val\n";
}
for (reset($array3);$key = key($array3);next($array3)) {
echo "$key => $array3[$key]\n";
}
$ka = count(array_keys($array3, "1着"));echo "1着$ka$kai";
?>

188：女傑 ◆nDpXSJz8i.：2013/03/12(火) 14:37:15
my $array3;

if (defined($array3)){
print "定義済み\n";
}else{
print "未定義値\n";
}

189：女傑 ◆nDpXSJz8i.：2013/03/12(火) 14:40:57
処理を抜ける（break）

190：女傑さん ◆nDpXSJz8i.：2013/03/12(火) 19:50:00
$配列=array(キー1 => 値１,キー２ => 値２・・・);
または
$配列[キー１]=値１;
$配列[キー２]=値２;
191：女傑 ◆nDpXSJz8i.：2013/03/12(火) 21:21:21
if (defined $urltable{$id}) {

}

192：女傑 ◆nDpXSJz8i.：2013/03/12(火) 21:29:36
サンプルプログラム
# @aからzが含まれているものを取得して@bに格納
@b = grep /z/, @a;

# @aからzが含まれていないものを取得して@bに格納
@b = grep !/z/, @a;

# @aからzが含まれているものの数を取得して$numに格納
$num = grep /z/, @a;

# $_を変更すると配列のデータも変更されます
# @aの中のaで始まるものの最後にAを付加する
grep {/^a/ && ($_ .= 'A')} @a;

193：女傑 ◆nDpXSJz8i.：2013/03/12(火) 21:52:45
if ($ENV{'REQUEST_METHOD'} eq "POST") { read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'}); }
else { $buffer = $ENV{'QUERY_STRING'}; }

if ($buffer eq "") { &error; }

@pairs = split(/&/,$buffer);
foreach $pair (@pairs)
{
($name, $value) = split(/=/, $pair);
$name =~ tr/+/ /;
$name =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$value =~ tr/+/ /;
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;

$value =~ s/\t//g;
$value =~ s/\r//g;
$value =~ s/\n//g;
$value =~ s/\.//g;
$value =~ s/\///g;
$value =~ s/&/&/g;
$value =~ s/"/"/g;
$value =~ s/</</g;
$value =~ s/>/>/g;
}

194：女傑 ◆nDpXSJz8i.：2013/03/13(水) 00:12:26
$hairetu["サラ3歳新馬"] = "1着";
$hairetu["朝日杯3歳ステークス"] = "1着";
$hairetu["皐月賞"] = "1着";
print_r($hairetu);

195：女傑 ◆nDpXSJz8i.：2013/03/13(水) 01:06:36
@xx = ( "Sun", "Mon", "Tue", "Wed", "Thu", "Fri", "Sat" );
@xx = grep(/^S/, @xx);
print "@xx\n";

196：女傑 ◆nDpXSJz8i.：2013/03/13(水) 01:15:35
$hairetu[] = "値1";
$hairetu[] = "値2";
$hairetu[] = "値3";

197：女傑 ◆nDpXSJz8i.：2013/03/13(水) 01:17:39
substr_count関数

198：女傑 ◆nDpXSJz8i.：2013/03/13(水) 01:31:44
open CSV,".CSV";
open SQL,">.SQL";

$cnt=0;
while (<CSV>) {
$cnt++;
s/\s//g;
s/\"//g;
s/,/','/g;
print SQL qq(INSERT INTO zipcode VALUES('$_');\n);
}
print $cnt;

close CSV;
close SQL;

199：女傑 ◆nDpXSJz8i.：2013/03/13(水) 11:43:13
<?php
$handle = fopen( "test.txt", "r" );

while( !feof($handle) ) {
　$rec = fgets( $handle );
　echo $rec;
}

fclose($handle);
?>

200：女傑 ◆nDpXSJz8i.：2013/03/13(水) 14:01:54
while ( $hairetu = <STDIN> ) {
chomp $hairetu;
if ($hairetu ne "") {
print "$hairetu[$i]";
}
else {
last;
}
}

201：女傑 ◆nDpXSJz8i.：2013/03/13(水) 15:17:25
@hairetu = <STDIN>;
$max = @hairetu;
$i=0;
while ( $i < $max ) {
chomp $hairetu;

if ($hairetu ne "") {
print "$hairetu[$i]";
}
else {
last;
}
$i++
}

202：女傑 ◆nDpXSJz8i.：2013/03/13(水) 18:07:59

<?php

$conn = pg_pconnect("dbname=publisher");
if (!$conn) {
echo "An error occurred.\n";
exit;
}

$result = pg_query($conn, "SELECT author, email FROM authors");
if (!$result) {
echo "An error occurred.\n";
exit;
}

$arr = pg_fetch_array($result, 0, PGSQL_NUM);
echo $arr[0] . " <- Row 1 Author\n";
echo $arr[1] . " <- Row 1 E-mail\n";

// PHP 4.1.0 以降、row パラメータはオプションです。result_type を指定
// したい場合は NULL を渡しておきます。pg_fetch_array を続けてコール
// すると、次の行を取得します。
$arr = pg_fetch_array($result, NULL, PGSQL_ASSOC);
echo $arr["author"] . " <- Row 2 Author\n";
echo $arr["email"] . " <- Row 2 E-mail\n";

$arr = pg_fetch_array($result);
echo $arr["author"] . " <- Row 3 Author\n";
echo $arr[1] . " <- Row 3 E-mail\n";

?>

203：女傑 ◆nDpXSJz8i.：2013/03/13(水) 18:34:40
sub kiroku {
flock(OUT, LOCK_EX);
if (!open(OUT,">> ./datalog.csv")) { &error(); }
print OUT "$word,$kensaku\n";
chmod(0666,"./datalog.dat");
close OUT;
flock(OUT, LOCK_NB);
}

204：女傑 ◆nDpXSJz8i.：2013/03/13(水) 22:06:16
if ( $hairetu =~ m/( docomo | [kcrtdhnsq]\.vordafone | ezweb )/gi ) {
$example = "携帯";
} else {
$example = "それ以外";
}

205：ページ処理 ◆nDpXSJz8i.：2013/03/13(水) 22:09:27
//ページ番号を取得
if(isset($_GET["p"]) && is_numeric($_GET["p"])) {
$p = $_GET["p"];
}else{
$p=0;
}

//表示データを読み込み
$data = bbs_view($p);

// HTML出力する（表示データ
for($i=0;$i<count($data);$i++){

$data[$i]["name"]
= htmlspecialchars($data[$i]["name"],ENT_QUOTES);
$data[$i]["title"]
= htmlspecialchars($data[$i]["title"],ENT_QUOTES);
$data[$i]["body"]
= nl2br(htmlspecialchars($data[$i]["body"],ENT_QUOTES));

print <<<EOF
<hr>
<dl class="message">
<dt class="msg-label">投稿日時</dt>
<dd class="msg-date">{$data[$i]["date"]}</dd>
<dt class="msg-label">名前</dt>
<dd class="msg-name">{$data[$i]["name"]}</dd>
<dt class="msg-label">タイトル</dt>
<dd class="msg-title">{$data[$i]["title"]}</dd>
<dt class="msg-label">本文</dt>
<dd class="msg-body">{$data[$i]["body"]}</dd>
</dl>

EOF;
}

print "<hr>\n";

//ページ番号状態を取得
$page = bbs_page($p);

//前ページ処理
if(isset($page["previous"])) {
print "<a href=\"./form.php?p={$page["previous"]}\">前のページ</a>　";
}

//次ページ処理
if($page["next"]) {
print "<a href=\"./form.php?p={$page["next"]}\">次のページ</a>";
}

206：女傑 ◆nDpXSJz8i.：2013/03/14(木) 00:11:52
<?php
$string = 'XYZ';
if (eregi('z', $string)) {
echo "'$string' は、'z' または 'Z' を含んでいます!";
}
?>
<?php
$str = 'foo o';
$str = preg_replace('/\s\s+/', ' ', $str);
// This will be 'foo o' now
echo $str;
?>

207：女傑 ◆nDpXSJz8i.：2013/03/14(木) 12:51:50


例1 オブジェクト指向型
<?php
$mysqli = new mysqli("localhost", "my_user", "my_password", "world");

/* 接続状況をチェックします */
if (mysqli_connect_errno()) {
printf("Connect failed: %s\n", mysqli_connect_error());
exit();
}

$query = "SELECT Name, CountryCode FROM City ORDER by ID LIMIT 3";
$result = $mysqli->query($query);

/* 数値添字配列 */
$row = $result->fetch_array(MYSQLI_NUM);
printf ("%s (%s)\n", $row[0], $row[1]);

/* 連想配列 */
$row = $result->fetch_array(MYSQLI_ASSOC);
printf ("%s (%s)\n", $row["Name"], $row["CountryCode"]);

/* 連想配列および数値添字配列 */
$row = $result->fetch_array(MYSQLI_BOTH);
printf ("%s (%s)\n", $row[0], $row["CountryCode"]);

/* 結果セットを開放します */
$result->free();

/* 接続を閉じます */
$mysqli->close();
?>

例2 手続き型
<?php
$link = mysqli_connect("localhost", "my_user", "my_password", "world");

/* 接続状況をチェックします */
if (mysqli_connect_errno()) {
printf("Connect failed: %s\n", mysqli_connect_error());
exit();
}

$query = "SELECT Name, CountryCode FROM City ORDER by ID LIMIT 3";
$result = mysqli_query($link, $query);

/* 数値添字配列 */
$row = mysqli_fetch_array($result, MYSQLI_NUM);
printf ("%s (%s)\n", $row[0], $row[1]);

/* 連想配列 */
$row = mysqli_fetch_array($result, MYSQLI_ASSOC);
printf ("%s (%s)\n", $row["Name"], $row["CountryCode"]);

/* 連想配列および数値添字配列 */
$row = mysqli_fetch_array($result, MYSQLI_BOTH);
printf ("%s (%s)\n", $row[0], $row["CountryCode"]);

/* 結果セットを開放します */
mysqli_free_result($result);

/* 接続を閉じます */
mysqli_close($link);
?>

208：女傑 ◆nDpXSJz8i.：2013/03/14(木) 12:53:25

<?php
$mysqli = new mysqli("localhost", "my_user", "my_password", "world");

/* 接続状況をチェックします */
if (mysqli_connect_errno()) {
printf("Connect failed: %s\n", mysqli_connect_error());
exit();
}

$query = "SELECT Name, CountryCode FROM City ORDER by ID DESC LIMIT 50,5";

if ($result = $mysqli->query($query)) {

/* 連想配列を取得します */
while ($row = $result->fetch_assoc()) {
printf ("%s (%s)\n", $row["Name"], $row["CountryCode"]);
}

/* 結果セットを開放します */
$result->free();
}

/* 接続を閉じます */
$mysqli->close();
?>

例2 手続き型
<?php
$link = mysqli_connect("localhost", "my_user", "my_password", "world");

/* 接続状況をチェックします */
if (mysqli_connect_errno()) {
printf("Connect failed: %s\n", mysqli_connect_error());
exit();
}

$query = "SELECT Name, CountryCode FROM City ORDER by ID DESC LIMIT 50,5";

if ($result = mysqli_query($link, $query)) {

/* 連想配列を取得します */
while ($row = mysqli_fetch_assoc($result)) {
printf ("%s (%s)\n", $row["Name"], $row["CountryCode"]);
}

/* 結果セットを開放します */
mysqli_free_result($result);
}

/* 接続を閉じます */
mysqli_close($link);
?>

上の例の出力は以下となります。

Pueblo (USA)
Arvada (USA)
Cape Coral (USA)
Green Bay (USA)
Santa Clara (USA)

例3 mysqli_result での iterator の使用法
<?php
$c = mysqli_connect('127.0.0.1','user', 'pass');

// イテレータがあるとき (PHP 5.4 でサポートされるようになりました)
foreach ( $c->query('SELECT user,host FROM mysql.user') as $row ) {
printf("'%s'@'%s'\n", $row['user'], $row['host']);
}

echo "\n==================\n";

// イテレータのないとき
$result = $c->query('SELECT user,host FROM mysql.user');
while ($row = $result->fetch_assoc()) {
printf("'%s'@'%s'\n", $row['user'], $row['host']);
}

?>

209：女傑 ◆nDpXSJz8i.：2013/03/14(木) 13:01:12


例1 オブジェクト指向型
<?php
$mysqli = new mysqli("localhost", "my_user", "my_password", "world");

/* 接続状況をチェックします */
if (mysqli_connect_errno()) {
printf("Connect failed: %s\n", mysqli_connect_error());
exit();
}

$query = "SELECT Name, CountryCode FROM City ORDER by ID DESC LIMIT 50,5";

if ($result = $mysqli->query($query)) {

/* 配列を取得します */
while ($row = $result->fetch_row()) {
printf ("%s (%s)\n", $row[0], $row[1]);
}

/* 結果セットを開放します */
$result->close();
}

/* 接続を閉じます */
$mysqli->close();
?>

例2 手続き型
<?php
$link = mysqli_connect("localhost", "my_user", "my_password", "world");

/* 接続状況をチェックします */
if (mysqli_connect_errno()) {
printf("Connect failed: %s\n", mysqli_connect_error());
exit();
}

$query = "SELECT Name, CountryCode FROM City ORDER by ID DESC LIMIT 50,5";

if ($result = mysqli_query($link, $query)) {

/* 配列を取得します */
while ($row = mysqli_fetch_row($result)) {
printf ("%s (%s)\n", $row[0], $row[1]);
}

/* 結果セットを開放します */
mysqli_free_result($result);
}

/* 接続を閉じます */
mysqli_close($link);
?>

210：女傑 ◆nDpXSJz8i.：2013/03/14(木) 21:35:34
$text = str_replace(array("\r\n","\r","\n"), '', $text);

211：女傑 ◆nDpXSJz8i.：2013/03/14(木) 22:13:25
$kazu = count($page_array);
$i=0;
for ($i = 0; $i < $kazu; $i++) {
$bango = $i+1+$page_line_num*$page_num-1-$page_line_num+1;
{
echo <<<EOF
$bango:$page_array[$i]&nbsp;$page_array2[$i]<br>
EOF;
}
echo "\n";
}

212：女傑 ◆nDpXSJz8i.：2013/03/14(木) 22:15:08
use Jcode;
#
# traditional
Jcode::convert(\$str, $ocode, $icode, "z");
# or OOP!
print Jcode->new($str)->h2z->tr($from, $to)->utf8;

213：女傑 ◆nDpXSJz8i.：2013/03/14(木) 22:16:34
use Unicode::Japanese;

# convert utf8 -> sjis
print Unicode::Japanese->new($str)->sjis;

# convert sjis -> utf8
print Unicode::Japanese->new($str,'sjis')->get;

# convert sjis (imode_EMOJI) -> utf8
# convert sjis (imode絵文字) -> utf8
print Unicode::Japanese->new($str,'sjis-imode')->get;

# convert ZENKAKU (utf8) -> HANKAKU (utf8)
# convert 全角 (utf8) -> 半角(utf8)

print Unicode::Japanese->new($str)->z2h->get;

214：女傑 ◆nDpXSJz8i.：2013/03/14(木) 23:27:43
@2012 = ( "AAA", "BBB", "CCC", "DDD", "EEE" );
splice(@2012, 2, 1);
print "@2012\n";

215：女傑 ◆nDpXSJz8i.：2013/03/15(金) 10:51:18
foreach (1..11) {

($name,$value) = split(/\:/,$lines[$_]);
$value =~ s/</</g;
$value =~ s/>/>/g;
$value =~ s/\n//g;
$form{$_} = $value;
}

216：女傑 ◆nDpXSJz8i.：2013/03/15(金) 11:39:24
for (reset($array);$key=key($array);next($array)) {
echo "key[$array]:$key[$array]";
}

217：女傑 ◆nDpXSJz8i.：2013/03/15(金) 11:51:06
//for (reset($array3);$key = key($array3);next($array3)) {
//echo "$key => $array3[$key]\n";
//}

218：女傑 ◆nDpXSJz8i.：2013/03/15(金) 17:00:01

<?php
$result = mysql_query("SELECT id,email FROM people WHERE id = '42'");
if (!$result) {
echo 'Could not run query: ' . mysql_error();
exit;
}
$row = mysql_fetch_row($result);

echo $row[0]; // 42
echo $row[1]; // 'email' の値
?>

219：女傑 ◆nDpXSJz8i.：2013/03/15(金) 17:52:39
<?php
if (file_exists("jcode-LE.php")) require_once("jcode-LE.php");

// 内部文字列文字化け対策
if (function_exists("mb_internal_encoding")) {
mb_internal_encoding("utf8");
mb_language("Japanese");
}

// 文字コードを変換する

$qry1 = htmlspecialchars($_POST[sakusya], ENT_QUOTES);
$qry2 = htmlspecialchars($_POST[kai], ENT_QUOTES);
$qry3 = htmlspecialchars($_POST[nendo], ENT_QUOTES);
$qry4 = htmlspecialchars($_POST[myoji], ENT_QUOTES);
$qry5 = htmlspecialchars($_POST[namae], ENT_QUOTES);
$qry6 = htmlspecialchars($_POST[sakuhin], ENT_QUOTES);
$qry7 = htmlspecialchars($_POST[shozoku], ENT_QUOTES);

// QUERYの文字コード統一
if (get_magic_quotes_gpc()) {
$qry1 = stripslashes($qry1);
$qry2 = stripslashes($qry2);
$qry3 = stripslashes($qry3);
$qry4 = stripslashes($qry4);
$qry5 = stripslashes($qry5);
$qry6 = stripslashes($qry6);
$qry7 = stripslashes($qry7);
$qry1 = mb_convert_encoding($qry1,"utf-8","JIS, sjis-win, eucjp-win, sjis");
$qry2 = mb_convert_encoding($qry2,"utf-8","JIS, sjis-win, eucjp-win, sjis");
$qry3 = mb_convert_encoding($qry3,"utf-8","JIS, sjis-win, eucjp-win, sjis");
$qry4 = mb_convert_encoding($qry4,"utf-8","JIS, sjis-win, eucjp-win, sjis");
$qry5 = mb_convert_encoding($qry5,"utf-8","JIS, sjis-win, eucjp-win, sjis");
$qry6 = mb_convert_encoding($qry6,"utf-8","JIS, sjis-win, eucjp-win, sjis");
$qry7 = mb_convert_encoding($qry7,"utf-8","JIS, sjis-win, eucjp-win, sjis");
}

$con = mysql_connect("localhost","","");
if (!$con)
{
die('Could not connect: ' . mysql_error());
}

mysql_select_db("island", $con);
mysql_query("SET NAMES utf8");

$sql="INSERT INTO bungaku (sakusya, kai, nendo, myoji, namae, sakuhin, shozoku)
VALUES
('$qry1','$qry2','$qry3','$qry4','$qry5','$qry6','$qry7')";

if (!mysql_query($sql,$con))
{
die('Error: ' . mysql_error());
}
echo "1 record added";

mysql_close($con)
?>
a

220：女傑 ◆nDpXSJz8i.：2013/03/15(金) 23:40:56
foreach (0..$retsusuu) {
chomp($file) if $file =~ /\n$/;
($name,$value) = split(/:/,$lines[$_],1);
$name =~ tr/+/ /;
$name =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$value =~ tr/+/ /;
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$value =~ s/\t//g;
$value =~ s/\r//g;
$value =~ s/\n//g;
$value =~ s/\.//g;
$value =~ s/\///g;
$value =~ s/&/&/g;
$value =~ s/"/"/g;
$value =~ s/</</g;
$value =~ s/>/>/g;
# $bun = jcode($name)->h2z->euc;
my ($icode, $nmatch) = Jcode::getcode($name);
$bun = Jcode::convert("$name", "utf8", $icode, "z");
# $bun = Unicode::Japanese->new($bun, $icode)->z2hKana->utf8;
if ("$bun" ne "") {
chomp($bun) if $bun =~ /\n$/;

$bun =~ s/.{160}/$&<BR>\n/g;
print <<"EOF";

<font>$bun</font><br>
EOF
}
}

221：女傑 ◆nDpXSJz8i.：2013/03/16(土) 14:31:18
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0//EN">
<html xmlns="http://www.w3.org/1999/xhtml&quot; xml:lang="ja" lang="ja">
<head>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html;CHARSET=euc-jp">
<title>test</title>
</head><body bgcolor=#ffffff>
<?php




for ($i = 0; $i < $kazu; $i++) {
$bango = $i+1;
{
echo <<<EOF
$bango:$kaar[$i]<br>
EOF;
}
echo "\n";
}

?><?php
//$arr = array("one", "two", "three");
if (isset($_POST["q"]) and !empty($_POST["q"])) { $qry = htmlspecialchars($_POST["q"], ENT_QUOTES); }
elseif (isset($_GET["q"]) and !empty($_GET["q"])) { $qry = htmlspecialchars($_GET["q"], ENT_QUOTES); }
else { $qry = sample; }

$keywords = preg_split("/[\s,]+/", "test and, examination");
$kazu = count($keywords);
if (!$kazu < 1):
while (list($value0,$value1) = each($keywords)) {
echo "$value0:$value1<br>\n";
}

foreach ($keywords as $value => $ni) {
echo "$value:$ni<br>\n";
}
reset($keywords);
endif;
?>
<br>
<?php
$dds = preg_split("/[\s,]+/", "kkk lll, mmm");
echo "$dds[0]" . "<br>";
echo "$dds[1]" . "<br>";
echo "$dds[2]";
?>
<br>
<?php
$keywords2 = preg_split("/[\s,]+/", "test and, examination");
$kazu2 = count($keywords2);
if ($kazu2 >= 10) {exit;}
for ($i = 0; $i < $kazu2; $i++) {
$bango = $i+1;
{
echo <<<EOF
$bango:$keywords2[$i]<br>
EOF;
}
echo "\n";
}
if (file_exists("sample.txt")) {

$lines = file("sample.txt");//$line = htmlspecialchars($lines);
foreach ($lines as $keyword1 => $keyword2) {

//while (list($name,$value) = each($lines)) {
//$text = htmlspecialchars($value);
$keyword1 = $keyword1+1;
list($key1,$key2) = preg_split("/[,]+/", "$keyword2");
{
echo "$keyword1:$key1=>$key2<br>\n";
}

}
}
else
{
echo "$qry は存在しません<br>";
}
?>

222：女傑 ◆nDpXSJz8i.：2013/03/16(土) 18:25:04
foreach (2..12) {

($name,$value) = split(/\:/,$lines[$_],2);
$value =~ s/</</g;
$value =~ s/>/>/g;
print "$name：$value<br>";
}

223：女傑 ◆nDpXSJz8i.：2013/03/16(土) 21:21:08

<?php
/* 接続をオープンします */
$mysqli = new mysqli("localhost", "my_user", "my_password", "world");

/* 接続状況をチェックします */
if (mysqli_connect_errno()) {
printf("Connect failed: %s\n", mysqli_connect_error());
exit();
}

$query = "SELECT Name, CountryCode FROM City ORDER BY Name";
if ($result = $mysqli->query( $query)) {

/* 行番号 400 に移動します */
$result->data_seek(399);

/* 行を取得します */
$row = $result->fetch_row();

printf ("City: %s Countrycode: %s\n", $row[0], $row[1]);

/* 結果セットを開放します */
$result->close();
}

/* 接続を閉じます */
$mysqli->close();
?>

例2 手続き型
<?php
/* 接続を開きます */
$link = mysqli_connect("localhost", "my_user", "my_password", "world");

/* 接続状況をチェックします */
if (!$link) {
printf("Connect failed: %s\n", mysqli_connect_error());
exit();
}

$query = "SELECT Name, CountryCode FROM City ORDER BY Name";

if ($result = mysqli_query($link, $query)) {

/* 行番号 400 に移動します */
mysqli_data_seek($result, 399);

/* 行を取得します */
$row = mysqli_fetch_row($result);

printf ("City: %s Countrycode: %s\n", $row[0], $row[1]);

/* 結果セットを開放します */
mysqli_free_result($result);
}

/* 接続を閉じます */
mysqli_close($link);
?>

224：女傑 ◆nDpXSJz8i.：2013/03/16(土) 22:01:49
$array3 = array('サラ2歳新馬' => '1着', '東京スポーツ杯2歳ステークス' => '2着', '朝日杯フューチュリティステークス' => '2着', '報知杯弥生賞' => '3着', '皐月賞' => '1着');//reset($array3);
//while (list($key, $val) = each($array3)) {
//echo "$key => $val\n";
//}
for (reset($array3);$key = key($array3);next($array3)) {
echo "$key => $array3[$key]<br>\n";
}
$ka = count(array_keys($array3, "1着"));$ka2 = count(array_keys($array3, "2着"));echo "1$rkai$ka$kai;2$rkai$ka2$kai";

225：女傑 ◆nDpXSJz8i.：2013/03/16(土) 23:18:48
#!/usr/local/bin/perl

$aaa{0001} = "056";
$aaa{0002} = "079";


print "Content-type: text/html\n\n";
print <<"HTML";

$aaa{'0001'}<BR>
$aaa{'0002'}

HTML
exit;

#!/usr/local/bin/perl

%aaa = ("itou","伊藤","takeuti","竹内","tanaka","田中");

print "Content-type: text/html\n\n";
print <<"HTML";

$aaa{'itou'}<BR>
$aaa{'takeuti'}<BR>
$aaa{'tanaka'}

HTML
exit;

226：女傑 ◆nDpXSJz8i.：2013/03/17(日) 13:02:05
%aaa = (
'0001' => '056',
'0002' => '079',
'0003' => '036'
);

227：女傑 ◆nDpXSJz8i.：2013/03/17(日) 15:02:13
while ( ($key, $value) = each(%ハッシュ) ) {
print "$key => $value\n";
} foreach $key (keys %ハッシュ) {
print "$key\n";
} foreach $value (values %ハッシュ) {
print "$value\n";
}

228：女傑 ◆nDpXSJz8i.：2013/03/17(日) 20:46:35
#!/usr/bin/perl

if ($ENV{'REQUEST_METHOD'} eq "POST") { read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'}); }
else { $buffer = $ENV{'QUERY_STRING'}; }

if ($buffer eq "") { &error; }
@pairs = split(/&/,$buffer);

foreach $pair (@pairs) {

($name, $value) = split(/=/, $pair);
$value =~ tr/+/ /;
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$value =~ tr/+/ /;
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$value =~ s/^s+//g ; # 文頭に来るスペースを削除
$value =~ s/s+$//g ; # 文末に来るスペースを削除
$value =~ s/<!--[^<>]*-->//g;
$value =~ s/\r//g;
$value =~ s/\n//g;
$value =~ s/\f//g;
$value =~ s/\t//g;
$value =~ s/\.//g;
$value =~ s/\///g;
$value =~ s/\t//g;
$value =~ s/\r\n/\n/g; # Win→Unix
$value =~ s/\r/\n/g; # Mac→Unix

$value =~ s/&/&/g;
$value =~ s/"/"/g;
$value =~ s/</</g;
$value =~ s/>/>/g;
$form{$name} = $value;
}

#if (!(-e $file)) { &error("存在しません"); }
#elsif (-z $file) { &error("データ異常"); }
#if (!open(IN,"$file")) { &error("ファイルが開けません"); }
#@lines = <IN>;
#close(IN);

if($form{'q'} ne "") { $id = "$form{'q'}"; }

%urltable = ('yahoo' => 'http://www.yahoo.co.jp','msn' => 'http://msn.co.jp/','hasegawa' => 'http://hasegawa.jp.land.to/');

if (exists $urltable{$id}) {
print "Location: $urltable{$id}\n";
print "\n";
}
else {
print "Content-type: text/html\n";
print "\n";
print "ID:$idは登録されていません。";
}

sub error {

local (@msg) = @_;
local ($i);

print "Content-type: text/html\n\n";

print <<"EOF";
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0//EN">
<HTML><HEAD>
<TITLE>WebCARD</TITLE>
<meta http-equiv="Content-Type" content="text/html; charset=x-sjis">
<SCRIPT language="JavaScript">
<!--
function PageBack(){ history.back(); }
//-->
</SCRIPT>
</HEAD>
<body bgcolor=#ffffff>
<h1>$msg[0]</h1>
EOF
if ($msg[1] ne '') {

print "<ul>\n";
foreach $i (1 .. $#msg) { print "<li>$msg[$i]\n"; }
print "</ul>\n";
}

print <<"EOF";
<h3>[<A HREF="JavaScript:history.back()">戻る</A>]</h3>
</body></html>
EOF
exit;

}

229：女傑 ◆nDpXSJz8i.：2013/03/17(日) 21:18:09
#if ($id =~ /$urltable{$id}/i)

230：女傑 ◆nDpXSJz8i.：2013/03/17(日) 22:11:40
$begin =~ s/^s+//g ; # 文頭に来るスペースを削除
$begin =~ s/s+$//g ; # 文末に来るスペースを削除
$expire =~ s/^s+//g ; # 文頭に来るスペースを削除
$expire =~ s/s+$//g ; # 文末に来るスペースを削除

231：女傑 ◆nDpXSJz8i.：2013/03/18(月) 10:18:38
$item = array(
array("name" => "Yamada", "age" => 32),
array("name" => "Tanaka", "age" => 26),
array("name" => "Suzuki", "age" => 43),
);

print $item[1]['name'] . "\n";
print $item[1]['age'] . "\n";

232：女傑 ◆nDpXSJz8i.：2013/03/18(月) 23:56:37

<?php
$search_array = array('first' => 1, 'second' => 4);
if (array_key_exists('first', $search_array)) {
echo "この配列には 'first' という要素が存在します";
}
?>

233：女傑 ◆nDpXSJz8i.：2013/03/19(火) 09:20:23
srand(time() + $ENV{"QUERY_STRING"});

$a = @array;
$i = int(rand($a));

print "$a[$i]\n";
print "\n";

234：女傑 ◆nDpXSJz8i.：2013/03/19(火) 14:02:07
$exif['GPSLatitude']

235：女傑 ◆nDpXSJz8i.：2013/03/19(火) 14:19:19
print $exif['GPSLatitude'][1] . "\n";print $exif['GPSLatitude'][2] . "\n";

236：女傑 ◆nDpXSJz8i.：2013/03/20(水) 11:08:22
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0//EN">
<html xmlns="http://www.w3.org/1999/xhtml&quot; xml:lang="ja" lang="ja">
<head><title>テスト</title>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html;CHARSET=euc-jp">
<body>
<?php
$thisphp="asahi.php";
$page_line_num=5;
if(!$page_num= htmlspecialchars($_GET["page"], ENT_QUOTES)){$page_num=1;}

$page_num = rtrim($page_num);
$page_num = ltrim($page_num);
$page_num = str_replace(">",">",$page_num);
$page_num = str_replace("<","<",$page_num);
$page_num = str_replace("\r\n", "\r",$page_num);
$page_num = str_replace("\r", "\n",$page_num);
$page_num = preg_replace("/\n{2,}/", "\n\n", $page_num);
$page_num = str_replace("\n", "<br>", $page_num);

$array=array('サラ2歳新馬' => '1着','東京スポーツ杯2歳ステークス' => '3着','朝日杯フューチュリティステークス' => '2着','報知杯弥生賞' => '4着','皐月賞' => '1着','東京優駿（日本ダービー）' => '1着','嵐山ステークス' => '3着','菊花賞' => '1着','有馬記念' => '3着');
$array3 = array('サラ2歳新馬' => '1着', '東京スポーツ杯2歳ステークス' => '1着', '朝日杯フューチュリティステークス' => '1着' , '報知杯弥生賞' => '1着');

$page_array=array_slice($array,($page_num-1)*$page_line_num,$page_line_num);

$allkazu = count($array);
//print_r($page_array);
if (1 > $page_num) {
echo <<<EOF
<font>ページが見つかりません</font>
</body></html>
EOF;
exit;
}

237：女傑 ◆nDpXSJz8i.：2013/03/20(水) 11:08:57
$kazu = count($page_array);
$i=0;
while (list($key, $val) = each($page_array)) {
$bango = $i+1+$page_line_num*$page_num-1-$page_line_num+1;
echo "$bango:$key => $val<br>\n";
$i++;
}

$next_page=$page_num+1;
$back_page=$page_num-1;
$kazu1 = count(array_keys($array2, "1着"));
$kazu2 = count(array_keys($array2, "2着"));
$kazu3 = count(array_keys($array2, "3着"));
$kazu4 = $allkazu-$kazu1-$kazu2-$kazu3;
if($back_page >= 1){$back_str='<a href="'.$thisphp.'?page='.$back_page.'">前へ</a>';}
else{$back_str='<span style="color:gray">前へ</span>';}
if(count($array) > ($next_page-1)*$page_line_num){$next_str='<a href="'.$thisphp.'?page='.$next_page.'">次へ</a>';}
else{$next_str='<span style="color:gray">次へ</span>';}

//$all_page_num=count($array) / ($page_line_num-1);
$all_page_num=count($array) / ($page_line_num-1);
//ceil
$kiriage = ceil($all_page_num); $kir = $kiriage-1;
for($i=1;$i<$kiriage;$i++){
if($i != $page_num){$page_str.='[<a href="'.$thisphp.'?page='.$i.'">'.$i.'</a>]';}
else{$page_str.='[<span style="color:gray">'.$i.'</span>]';}
}
//$soupage = floor($all_page_num);
$array_lowercase = array_map('strtolower', $array);
$array4 = array_multisort($array_lowercase, SORT_ASC, SORT_NUMERIC, $array2);
//print_r(array_count_values($array2));
$zensei = "{$kazu1}-{$kazu2}-{$kazu3}-{$kazu4}";
$sen = "戦";
$shou = "勝";
$icchaku = $kazu1;
$shoritu = $kazu1/$allkazu;
$shoritu = round($shoritu, 3);
$rentai = (($kazu1)+($kazu2))/$allkazu;
$rentai = round($rentai, 3);
if ($all_page_num < $page_num) {
echo <<<EOF
<font>ページが見つかりません</font>
</body></html>
EOF;
exit;
}
if ($rentai != 1){
$rentai = sprintf( "%.3f", $rentai );
$rentai = substr_replace($rentai, "", 0,1);
}
if ($rentai == 1) { $rentai = '1.000'; }
if ($shoritu != 1){
$shoritu = sprintf( "%.3f", $shoritu );
$shoritu = substr_replace($shoritu, "", 0,1);
}
if ($shoritu == 1) { $shoritu = '1.000'; }

echo <<<EOF
<p>$back_str&nbsp;$page_str&nbsp;$next_str</p>
<p>成績$allkazu$sen$icchaku$shou&nbsp;[$zensei]</p>
<p>勝率$shoritu&nbsp;連対率$rentai</p>
EOF;
$kai = "回";
foreach (array_count_values($array2) as $key => $val) {
echo "$key$val$kai<br>\n";

}
echo <<<EOF
<p>$page_num/$kir</p>
EOF;
reset($array3);
while (list($key, $val) = each($array3)) {
echo "$key => $val<br>\n";
}
for (reset($array3);$key = key($array3);next($array3)) {
echo "$key => $array3[$key]<br>\n";
}
foreach ($array3 as $key => $val) {
echo "$key => $val<br>\n";
}
$ka = count(array_keys($array3, "1着"));
$ka2 = count(array_keys($array3, "2着"));
$ka3 = count(array_keys($array3, "3着"));
$ka4 = count($array3)-$ka-ka2-ka3;
echo "1着$ka$kai<>2着$ka2$kai<>3着$ka3$kai<>着外$ka4$kai";
?>
</body></html>

238：女傑 ◆nDpXSJz8i.：2013/03/20(水) 15:36:09

if (-e "./data/$FORM{'id'}\.dat") { &error(); }

if (!open(OUT,"> ./data/$FORM{'id'}\.dat")) { &error(); }
print OUT "$pwd\n";
close(OUT);
chmod(0666,"./data/$FORM{'id'}\.dat");
if (!open(IN,"./sysop.cgi")) { &error('',''); }
$master = <IN>; chop($master) if $master =~ /\n$/;
close(IN);

239：女傑 ◆nDpXSJz8i.：2013/03/21(木) 16:34:20
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0//EN">
<html xmlns="http://www.w3.org/1999/xhtml&quot; xml:lang="ja" lang="ja">
<head><title>テスト</title>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html;CHARSET=euc-jp">
<body>
<?php
$thisphp="deepimpact.php";
$page_line_num=5;
if(!$page_num= htmlspecialchars($_GET["page"], ENT_QUOTES)){$page_num=1;}

$page_num = rtrim($page_num);
$page_num = ltrim($page_num);
$page_num = str_replace(">",">",$page_num);
$page_num = str_replace("<","<",$page_num);
$page_num = str_replace("\r\n", "\r",$page_num);
$page_num = str_replace("\r", "\n",$page_num);
$page_num = preg_replace("/\n{2,}/", "\n\n", $page_num);
$page_num = str_replace("\n", "<br>", $page_num);
//I, II, III
$array = array('サラ2歳新馬' => '1着','若駒ステークス' => '1着','報知杯弥生賞' => '1着','皐月賞' => '1着','東京優駿（日本ダービー）' => '1着','神戸新聞杯' => '1着','菊花賞' => '1着','有馬記念05' => '2着','阪神大賞典' => '1着','天皇賞（春）' => '1着','宝塚記念' => '1着','ジャパンカップ' => '1着','有馬記念06' => '1着');
$array2 = array('凱旋門賞' => '失格');
$array3 = array_merge($array,$array2);

240：女傑 ◆nDpXSJz8i.：2013/03/21(木) 16:35:14
$page_array=array_slice($array,($page_num-1)*$page_line_num,$page_line_num);

$allkazu = count($array);
$kazu33 = count($array2);
//print_r($page_array);
if (1 > $page_num) {
echo <<<EOF
<font>ページが見つかりません</font>
</body></html>
EOF;
exit;
}
$kazu = count($page_array);
$i=0;
while (list($key, $val) = each($page_array)) {
$bango = $i+1+$page_line_num*$page_num-1-$page_line_num+1;
echo "$bango:$key => $val<br>\n";
$i++;
}

$next_page=$page_num+1;
$back_page=$page_num-1;
$kazu1 = count(array_keys($array, "1着"));
$kazu2 = count(array_keys($array, "2着"));
$kazu3 = count(array_keys($array, "3着"));
$kazu4 = $allkazu-$kazu1-$kazu2-$kazu3;
if($back_page >= 1){$back_str='<a href="'.$thisphp.'?page='.$back_page.'">前へ</a>';}
else{$back_str='<span style="color:gray">前へ</span>';}
if(count($array) > ($next_page-1)*$page_line_num){$next_str='<a href="'.$thisphp.'?page='.$next_page.'">次へ</a>';}
else{$next_str='<span style="color:gray">次へ</span>';}

//$all_page_num=count($array) / ($page_line_num-1);
$all_page_num=count($array) / ($page_line_num-1);
$kiriage = ceil($all_page_num); $kir = $kiriage-1;
for($i=1;$i<$kiriage;$i++){
if($i != $page_num){$page_str.='[<a href="'.$thisphp.'?page='.$i.'">'.$i.'</a>]';}
else{$page_str.='[<span style="color:gray">'.$i.'</span>]';}
}

$zensei = "{$kazu1}-{$kazu2}-{$kazu3}-{$kazu4}";
$sen = "戦";
$shou = "勝";
$icchaku = $kazu1;
$shoritu = $kazu1/$allkazu;
$shoritu = round($shoritu, 3);
$rentai = (($kazu1)+($kazu2))/$allkazu;
$rentai = round($rentai, 3);
if ($all_page_num < $page_num) {
echo <<<EOF
<font>ページが見つかりません</font>
</body></html>
EOF;
exit;
}
if ($rentai != 1 or 0){
$rentai = sprintf( "%.3f", $rentai );
$rentai = substr_replace($rentai, "", 0,1);
}
if ($rentai == 1) { $rentai = '1.000'; }
if ($rentai == 0) { $rentai = '.000'; }
if ($shoritu != 1 or 0){
$shoritu = sprintf( "%.3f", $shoritu );
$shoritu = substr_replace($shoritu, "", 0,1);
}
if ($shoritu == 1) { $shoritu = '1.000'; }
if ($shoritu == 0) { $shoritu = '.000'; }
$ppp = "ページ";
echo <<<EOF
<p>$back_str&nbsp;$page_str&nbsp;$next_str</p>
<p>$page_num/$kir$ppp</p>
<p>成績$allkazu$sen$icchaku$shou&nbsp;[$zensei]</p>
<p>勝率$shoritu&nbsp;連対率$rentai</p>
EOF;
新着レスの表示

名前： E-mail（省略可）：

※書き込む際の注意事項はこちら

※画像アップローダーはこちら

（画像を表示できるのは「画像リンクのサムネイル表示」がオンの掲示板に限ります）
掲示板管理者へ連絡 無料レンタル掲示板