Perlコーディング初心者質問スレ Part 57
at PHP
[
2ch
|
▼Menu
]
■コピペモード
□
スレを通常表示
□
オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト
250:nobodyさん 08/03/28 15:57:20 なるほど。 s{\d\d(\d\d)/0?(\d+)/0?(\d+)[^ ]+ 0?(\d+):(\d+):\d+}{$1/$2/$3 $4:$5}; 251:nobodyさん 08/03/28 16:45:45 my @splitdata = $orgdate =~ /(\d{1,2})+/g; my $datetime = sprintf("%02d/%d/%d %d:%d:%d", @splitdata); 252:nobodyさん 08/03/28 16:49:23 間違えた my @splitdata = $orgdate =~ /(\d{1,2})+/g; my $datetime = sprintf("%02d/%d/%d %d:%d", @splitdata); print $datetime; 253:nobodyさん 08/03/28 16:59:35 2008/03/28(金) 09:30:08から08/3/28(Fri) 9:30にするにはどうする？ 254:nobodyさん 08/03/28 17:35:24 >>247-252 もはや、知らない奴が見たら暗号でしかないなw 255:nobodyさん 08/03/28 19:09:17 javascriptのプログラムをPerlに移植しようとしていて、複合代入演算子の挙動が違うのでとまどっています。 例えばjavascriptで var c=1;alert(c=c+(c*=10)+(c*=100)); は1011 Perlで my $c=1;print($c=$c+($c*=10)+($c*=100)); は1020 になります。 そこで、この問題について載っているサイトがあれば教えてください。
次ページ
最新レス表示
スレッドの検索
類似スレ一覧
話題のニュース
おまかせリスト
▼オプションを表示
レスジャンプ
mixiチェック！
Twitterに投稿
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch
4937日前に更新/211 KB
担当:undef