namazu-ml(avocado)

[Ken-ichi Hirose <hirose@xxxxxxxxxxxxxxxxxxxx>]

広瀬と申します。

 <ccsatoru@xxxxxxxxxxxxxxxxxx> wrote.
/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
>>>今、Win32 で use Cwd;  print cwd(); してみたら
>>>c:\windows
>>>みたいな結果が返ってきました。パスの区切りが \ なんですけど、どう
>>>しましょう…。
>>s|\\|/|g;
>>でとりあえず変換していました(私は)
>
>sub cwd2 () {
>    my ($cwd);
>    
>    $cwd = cwd();
>    $cwd =~ s|\\|/|g if $SYSTEM eq "win32";
                      ^^^^^^^^^^^^^^^^^^^^^これはいらないのでは？
>    $cwd;
>}
unix で \ が作れないような気がしますが。。。

とおもったら作れちゃいますね。
じゃあ環境変数で windir があったら $SYSTEM="win32" にしたほうがいいのかな？

   Best regards,
--
Ken-ichi Hirose (^^)k!
e-mail: hirose@xxxxxxxxxxxxxxxxxxxx