File input/output: Difference between revisions

From Rosetta Code
Content added Content deleted
Line 16: Line 16:
==[[UNIX Shell]]==
==[[UNIX Shell]]==
'''Interpreter:''' [[Bourne Again SHell]]
'''Interpreter:''' [[Bourne Again SHell]]
'''Operating System:''' [[UNIX]]


#!/usr/bin/bash
#!/usr/bin/bash

Revision as of 03:14, 14 January 2007

Task
File input/output
You are encouraged to solve this task according to the task description, using any language you may know.

In this task, the job is to create a file called "output.txt", and place in it the contents of the file "input.txt".

Perl

Interpreter: Perl 5.8.8

#!/usr/bin/perl -w

open INPUT, "<input.txt";
open OUTPUT, ">output.txt";

while ( <INPUT> ) {
  print OUTPUT $_;
}

UNIX Shell

Interpreter: Bourne Again SHell Operating System: UNIX

#!/usr/bin/bash

cat input.txt > output.txt