jw_cad 外部変形－ (1259) perlで環境変数を使う－

外部変形はデータのやり取りをテキストファイルで行うのでプログラム言語は自由に選ぶことができます。図形は機能的かつシンプルなため、数多くのユーザーに受け入れられています。

:perlで環境変数を使う
@echo off
set str=ようこそありがとう
perl -x %~f0 > jwc_temp.txt
goto:eof

REM #jww
REM #e

#!perl
$str = $ENV{'str'};
print "h#str=$str\n";
__END__