ForNext
Shut the fuck up and write some code
第一引数に指定されたファイルから読んで、標準出力に書く
VBScript
更新日 : 2008.05.23
Dim objFs : Set objFs = CreateObject("Scripting.FileSystemObject") Dim objText : Set objText = objFs.OpenTextFile(WScript.Arguments(0)) Do Until objText.AtEndOfStream WScript.StdOut.WriteLine objText.ReadLine Loop objText.Close Set objText = Nothing Set objFs = Nothing
S:\>cscript //nologo s:\lesson003.vbs s:\lesson002.vbs Dim var1: var1 = "Hello" Dim var2: var2 = "World" WScript.Echo var1 + ", " + var2 + "!"
JScript
更新日 : 2008.05.23
var objFs = WScript.CreateObject("Scripting.FileSystemObject"); var objText = objFs.OpenTextFile(WScript.Arguments(0)); do { WScript.StdOut.WriteLine(objText.ReadLine()); } while (! objText.AtEndOfStream); objText.Close();
S:\>cscript //nologo s:\lesson003.js s:\lesson002.js var var1 = "Hello"; var var2 = "World"; WScript.Echo(var1 + ", " + var2 + "!");
Perl
更新日 : 2008.05.23
print while(<>);
S:\>perl s:\lesson003.pl s:\lesson002.pl $var1 = "Hello"; $var2 = "World"; print $var1, ", ", $var2, "!", "\n";
PHP
更新日 : 2008.05.23
<?php $fp = fopen($argv[1], "r"); while (!feof($fp)) { print(fgets($fp)); } fclose($fp); ?>
S:\>php s:\lesson003.php s:\lesson004.php <?php $var1 = "Hello"; $var2 = "World"; print $var1, ", ", $var2, "!", "\n"; ?>
Python
Ruby
更新日 : 2008.05.23
ARGF.each do |line| puts line end
S:\>ruby s:\lesson003.rb s:\lesson003.rb var1 = "Hello"; var2 = "World"; print var1, ", ", var2, "!", "\n";
PowerShell
Scala
F#
C
C++
C++Builder
VC++
C#
更新日 : 2012.05.10
using System; using System.IO; class lesson0002 { static void Main(string[] args) { TextReader input = new StreamReader(args[0]); string line; while ((line = input.ReadLine()) != null) { Console.WriteLine(line); } input.Close(); input.Dispose(); } }
S:\>csc lesson0002.cs /nologo S:\>lesson0002 s:\lesson001.rb var1 = "Hello"; var2 = "World"; print var1, ", ", var2, "!", "\n";
Java
更新日 : 2012.05.10
import java.io.*; public class lesson0003 { public static void main(String args[]) throws Exception { BufferedReader input = new BufferedReader(new InputStreamReader(new FileInputStream(args[0]))); String line; while ((line = input.readLine()) != null) { System.out.println(line); } input.close(); } }
S:\009 ファイル入出力>javac lesson0003.java S:\009 ファイル入出力>java -cp . lesson0003 s:\lesson001.rb var1 = "Hello"; var2 = "World"; print var1, ", ", var2, "!", "\n";