🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: fj.lang.tcl
Article #458

Re: [Q] open command

#458
From: Kenji Sugita
Date: Sun, 17 Mar 1996 00:00
35 lines
1266 bytes
  $B$3$s$K$A$O!#(B

;;; In article <TAMURA.96Mar15131344@liberty.dbg.bs1.fc.nec.co.jp> tamura@liberty.dbg.bs1.fc.nec.co.jp (Minoru Tamura) writes:
;;;
;;;    tcl $B$N(B open $B%3%^%s%I$G<ALd$7$^$9!#(B
;;; 
;;;    tclsh $B$G%3%^%s%I%Q%$%W%i%$%s$rMQ$$!"(Bcat $B$H$NF~=PNO$r9T$&$?$a!"(B
;;;    $B0J2<$N%7!<%1%s%9$r<B9T$7$^$7$?$,!":G8e$N(B gets $B$G%9%H!<%k$7$F(B
;;;    $B$7$^$$$^$7$?!#(B
;;; 
;;;    $B$I$&$7$F$G$7$g$&$+(B?
;;; 
;;;    tamura> tclsh
;;;    % set id [open |cat r+]
;;;    file5
;;;    % puts $id a
;;;    % gets $id res

    $ tclsh 
    % set id [open |cat r+]
    file10
    % puts $id a
 => % flush $id
    % gets $id res
    1
    % set res
    a
    % 

$B$G$I$&$G$7$g$&!#(B
--


Kenji Sugita
sugita@sra.co.jp
Technical Details
Message-ID: <SUGITA.96Mar17133936@sran362.sra.co.jp>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail
References: <TAMURA.96Mar15131344@liberty.dbg.bs1.fc.nec.co.jp>

Show Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS
X-Google-Thread: 15a83d,d8cec3a850bda805,start
X-Google-Attributes: gid15a83d,public
From: sugita@sra.co.jp (Kenji Sugita)
Subject: Re: [Q] open command
Date: 1996/03/17
Message-ID: <SUGITA.96Mar17133936@sran362.sra.co.jp>
X-Deja-AN: 142966393
distribution: fj
sender: news@sramhe.sra.co.jp
references: <TAMURA.96Mar15131344@liberty.dbg.bs1.fc.nec.co.jp>
organization: Software Research Associates, Inc., Japan
newsgroups: fj.lang.tcl