変換

| コメント(0) | トラックバック(0)
$inputfile="サンプルテキスト.txt";
$outputfile="サンプルテキストout.txt";
open(IN, $inputfile);
@ARY = <IN>;
close(IN);

$myStr = join("", @ARY);
$myStr =~ tr/a-z/A-Z/;	#小文字→大文字
open (OUT,"> $outputfile");#書き込み新規文章で書き込む
print (OUT $myStr);
close(OUT);

exit;

トラックバック(0)

トラックバックURL: http://www.adg7.com/mt/mt-tb.cgi/548

コメントする

エントリー一覧

このブログ記事について

このページは、たけうちとおるが2009年8月27日 13:01に書いたブログ記事です。

ひとつ前のブログ記事は「抜き出す」です。

次のブログ記事は「設定/MacOSX」です。

最近のコンテンツはインデックスページで見られます。過去に書かれたものはアーカイブのページで見られます。

OpenID対応しています OpenIDについて