Hello world/Line printer: Difference between revisions

From Rosetta Code
Content added Content deleted
(→‎Tcl: Added implementation)
(→‎{{header|Tcl}}: More variants)
Line 12: Line 12:
On Unix only:
On Unix only:
<lang tcl>exec lp << "Hello World!"</lang>
<lang tcl>exec lp << "Hello World!"</lang>
or
<lang tcl>set f [open |lp w]
puts $f "Hello World!"
close $f</lang>
On Windows only:
<lang tcl>set f [open prn w]
puts $f "Hello World!"
close $f</lang>


=={{header|UNIX Shell}}==
=={{header|UNIX Shell}}==

Revision as of 07:19, 3 October 2010

BASIC

Works with: QBasic

<lang qbasic>LPRINT "Hello World!"</lang>

Batch File

<lang dos>ECHO Hello world!">PRN</lang>

Tcl

On Unix only: <lang tcl>exec lp << "Hello World!"</lang> or <lang tcl>set f [open |lp w] puts $f "Hello World!" close $f</lang> On Windows only: <lang tcl>set f [open prn w] puts $f "Hello World!" close $f</lang>

UNIX Shell

Works with: Bourne Shell

<lang bash>echo 'Hello World!'|lp</lang>