http://www.ruby-lang.org/ja/downloads/
ActiveScriptRuby は以下のサイトからダウンロードできます。現時点の最新正式版は、バージョン1.9.3-p0 のようです。
http://www.artonx.org/data/asr/
ダウンロードしたRuby-1.9.3.msi を実行します。
<?php
function sortArr($arr){
sort($arr,SORT_NUMERIC);
for($i = 0; $i < count($arr);$i++)
echo ($i+1).":".$arr[$i]."\n";
}
echo "項目を入力 (カンマで区切って記述):";
$a = trim(fgets(STDIN));
sortArr(explode(",",$a));
?>
function sortArr($arr){
asort($arr,SORT_STRING);
foreach($arr as $key => $value)
echo $key . ": " . $value . "\n";
}
echo "項目を入力(カンマで区切って記述):";
$a = trim(fgets(STDIN));
sortArr(explode(",",$a));
function explodeNow($str){
$arr = explode(" ",$str);
for($i = 0;$i < count($arr);$i++)
echo $i . ": " . $arr[$i] . "\n";
}
echo "テキストを入力:";
$a = trim(fgets(STDIN));
explodeNow($a);
function implodeNow($arr){
$str = implode ("、",$arr);
echo $str . "。";
}
$arr = array();
while(true){
echo "テキストを入力";
$a = trim(fgets(STDIN));
if ( $a == ""){break;}
array_push($arr,$a);
}
implodeNow($arr);
<?php
$root = simplexml_load_file('sample.xml');
foreach($root->children() as $data)
echo(mb_convert_encoding($data->name . "," . $data->mail . "," . $data->tel,'sjis','utf-8') . "\n");
?>
<?xml version="1.0" encoding="utf-8"?>
<datas>
<data>
<name>yamada</name>
<mail>yamada.taro@gmail.com</mail>
<tel>090-1111-1111</tel>
</data>
<data>
<name>tsuyano</name>
<mail>tuyano@mac.com</mail>
<tel>090-1111-1111</tel>
</data>
<data>
<name>hanako</name>
<mail>hanako@flower</mail>
<tel>080-7777-7777</tel>
</data>
</datas>
<?php
function addToXMLData($root,$name,$mail,$tel){ $obj=$root->addChild('data'); $obj->addChild('name',mb_convert_encoding($name,'utf-8','sjis')); $obj->addChild('mail',mb_convert_encoding($mail,'utf-8','sjis')); $obj->addChild('tel',mb_convert_encoding($tel,'utf-8','sjis')); } function saveXMLData($name,$mail,$tel){ $root = simplexml_load_file('sample.xml'); addToXMLData($root,$name,$mail,$tel); $root->asXML('sample.xml'); } echo "input name:"; $name = trim(fgets(STDIN)); echo "input mail:"; $mail = trim(fgets(STDIN)); echo "input tel:"; $tel = trim(fgets(STDIN)); saveXMLData($name,$mail,$tel); ?>