Latest comments for language 'PHP' on doukaku.org

caitsith's comment on 漢数字で九九の表

php5。出題は九九なので余計ですが、出力時の桁あわせを9以上の数字にも対応しています。

$nums = array("〇", "一", "二", "三", "四", "五", "六", "七", "八", "九", "十", "十一");
$start = array_search("一", $nums);
end($nums);
$digit = strlen(key($nums) * key($nums));
for ($i = $start; $i < count($nums); $i++) {
    for ($j = $start; $j < count($nums); $j++) {
        $res = str_split(str_pad($i * $j, $digit, " ", STR_PAD_LEFT));
        foreach ($res as $row) {
            if ($row == " ") {
                print("　");
            } else {
                print($nums[$row]);
            }
        }
        print("　");
    }
    print("\n");
}

[ PHP ] [ download code ] ]

caitsith's comment on 漢数字で九九の表

漢数字で九九の表 (Nested Flatten)

ついでに。php4でも動作するはず。

$nums = array("〇", "一", "二", "三", "四", "五", "六", "七", "八", "九", "十", "十一");
$start = array_search("一", $nums);
end($nums);
$digit = strlen(key($nums) * key($nums));
for ($i = $start; $i < count($nums); $i++) {
    for ($j = $start; $j < count($nums); $j++) {
        $res = str_pad($i * $j, $digit, " ", STR_PAD_LEFT);
        for ($k = $digit - $digit; $k < $digit; $k++) {
            $num = substr($res, $k, $start);
            if ($num == " ") {
                print("　");
            } else {
                print($nums[$num]);
            }
        }
        print("　");
    }
    print("\n");
}

[ PHP ] [ download code ] ]

ckbx's comment on LL Golf Hole 7 - バイト数を読みやすくする

LL Golf Hole 7 - バイト数を読みやすくする (Nested Flatten)

do_akiさんのコードをさらに圧縮してみました。75 bytes.

1	<?for($b=$argv[1];$b>=1024;++$i)$b/=1024;echo$b,substr('KMGTPEZY',$i,!!$i);

[ PHP ] [ download code ] ]

do_aki's comment on LL Golf Hole 7 - バイト数を読みやすくする

LL Golf Hole 7 - バイト数を読みやすくする (Nested Flatten)

あぅ。言語選択し忘れたので、再投稿 ><

ついでにヨタまでにして、108b 短くできないかなぁ。。。

1	<?php $l=array('','K','M','G','T','P','E','Z','Y');$b=$argv[1];for(;$b>=1024;++$i){$b/=1024;}echo $b,$l[$i];

[ PHP ] [ download code ] ]

だいら's comment on 文字列型日時ののN秒後時間取得

文字列型日時ののN秒後時間取得 (Nested Flatten)

<?php
function DateEx($time, $diff){
    echo echo date('YmdHis',strtotime($time)+$diff);
}

[ PHP ] [ download code ] ]

だいら's comment on LL Golf Hole 8 - 横向きのピラミッドを作る

LL Golf Hole 8 - 横向きのピラミッドを作る (Nested Flatten)

1 2	for($c=2fgets(STDIN);$i++<$c;)echo str_repeat('',($i>$c/2)?$c-$i:$i)." ";

[ PHP ] [ download code ] ]

caitsith's comment on LL Golf Hole 8 - 横向きのピラミッドを作る

LL Golf Hole 8 - 横向きのピラミッドを作る (Nested Flatten)

1 2	$n=4; for($i=1-$n;$i<$n;$i++)printf("%'*".($n-abs($i))."s\n",'');

[ PHP ] [ download code ] ]

だいら's comment on LL Golf Hole 6 - 10進数を2進数に基数変換する

LL Golf Hole 6 - 10進数を2進数に基数変換する (Nested Flatten)

変換先指定対応版

1	<?$a=split(' ',fgets(STDIN));echo base_convert($a[0],10,$a[1]>0?$a[1]:2);

[ PHP ] [ download code ] ]

だいら's comment on LL Golf Hole 6 - 10進数を2進数に基数変換する

LL Golf Hole 6 - 10進数を2進数に基数変換する (Nested Flatten)

短くする楽しみが全く無いな。

1	<?=decbin(fgets(STDIN));

[ PHP ] [ download code ] ]

匿名's comment on LL Golf Hole 5 - 最上位の桁を数え上げる

LL Golf Hole 5 - 最上位の桁を数え上げる (Nested Flatten)

powを使った方が短いようですが一応載せてみます。

1	<?for($a=0;$a<=$argv[1];)ereg('^.0*$',$a++,$m)&&print"$m[0] ";

[ PHP ] [ download code ] ]

匿名's comment on LL Golf Hole 5 - 最上位の桁を数え上げる

LL Golf Hole 5 - 最上位の桁を数え上げる (Nested Flatten)

"の方が微妙に短いようですね。

1	<?for($a=0;$a<=$argv[1];$a+=pow(10,strlen($a)-print"$a "));

[ PHP ] [ download code ] ]

だいら's comment on LL Golf Hole 5 - 最上位の桁を数え上げる

LL Golf Hole 5 - 最上位の桁を数え上げる (Nested Flatten)

素直に書いた方が短いんですけどね。71byte

1 2	<?$m=fgets(STDIN);for($a=0;$a<=$m;$a+=pow(10,strlen($a)-print$a.' '));

[ PHP ] [ download code ] ]

だいら's comment on LL Golf Hole 5 - 最上位の桁を数え上げる

LL Golf Hole 5 - 最上位の桁を数え上げる (Nested Flatten)

80byte

1 2	<?$m=fgets(STDIN);for($a=0;$a<=$m;eval('$a+=1e'.(strlen($a)-1).';'))echo$a,' ';

[ PHP ] [ download code ] ]

stog's comment on echoクライアント

echoクライアント (Nested Flatten)

PHP 5.1.6

$ php -q client_echo.php localhost 7 < input_file > result_file

#!/usr/bin/env php
<?php
$host = $argv[1];
$port = $argv[2];

$sock = socket_create(AF_INET, SOCK_STREAM, SOL_TCP);
socket_connect($sock, $host, $port);

while ($line = fgets(STDIN, 1024)) {
    socket_write($sock, $line, strlen($line));
    echo socket_read($sock, 1024);
}
?>

[ PHP ] [ download code ] ]

匿名's comment on LL Golf Hole 3 - 13日の金曜日を数え上げる

LL Golf Hole 3 - 13日の金曜日を数え上げる (Nested Flatten)

http://ja.doukaku.org/comment/7029/ だいらさんの投稿を参考に少し縮めました。まだ負けてますが、マジックナンバーぽいのが少ないと言うことで。

1	<?for($i=time();$i<mktime(0,0,0,1,1,14);$i+=86400)$n+=date(wd,$i)-513?0:print date(YMj_,$i);echo$n;

[ PHP ] [ download code ] ]

oooooooo's comment on LL Golf Hole 4 - 文章から単語の索引を作る

LL Golf Hole 4 - 文章から単語の索引を作る (Nested Flatten)

「g」がファイル名の場合 107 bytes です。

1	<?php foreach(file(g)as$l=>$d){preg_match_all('/\w+/',$d,$m);foreach($m[0]as$w)$D[$w][]=$l+1;}print_r($D);

[ PHP ] [ download code ] ]

だいら's comment on LL Golf Hole 3 - 13日の金曜日を数え上げる

LL Golf Hole 3 - 13日の金曜日を数え上げる (Nested Flatten)

1 2	<?for(;1388415600>$t=strtotime($i++."day");$c+=date(dw,$t)-135?0:print date("Y-m-d ",$t));echo$c;

[ PHP ] [ download code ] ]

匿名's comment on LL Golf Hole 3 - 13日の金曜日を数え上げる

LL Golf Hole 3 - 13日の金曜日を数え上げる (Nested Flatten)

PHPがなかったので。あまりうまく書けませんでしたが。

1
2
3

for($i=new DateTime;$i<=new DateTime('2013-12-31');$i->modify('+1 day')){
 if($i->format('wd')==513){$s.=$i->format('Y-m-d ');++$n;}
}echo$s,$n;

[ PHP ] [ download code ] ]

だいら's comment on LL Golf Hole 2 - 文字列に含まれる単語の最初の文字を大文字にする

LL Golf Hole 2 - 文字列に含まれる単語の最初の文字を大文字にする (Nested Flatten)

1	<?=ucwords(fgets(STDIN));

[ PHP ] [ download code ] ]

twk's comment on LL Golf Hole 1 - tinyurl.comを使ってURLを短縮する

LL Golf Hole 1 - tinyurl.comを使ってURLを短縮する (Nested Flatten)

PHPがなかったので登録して書いてみます。第二問も出るのかな？

1	<?=join(file('http://tinyurl.com/api-create.php?url=http://ll.jus.or.jp/2008/info/xgihyo'));

[ PHP ] [ download code ] ]