HP3000-L Archives

March 2002, Week 4

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
Mark Bixby <[log in to unmask]>
Reply To:
Mark Bixby <[log in to unmask]>
Date:
Fri, 22 Mar 2002 11:08:22 -0800
Content-Type:
text/plain
Parts/Attachments:
text/plain (48 lines)
This should do the same thing, reading from stdin:

#!/bin/sh

IFS='|'
while read file doc folder title; do
   test -f $file && capture $file $doc $folder $title
done

- Mark B.

Paul H. Christidis wrote:

> Fellow list members,
>
> Could someone more familiar with Unix, than I am, help me convert the
> following command file segment (Hpstdin is actually another data file with
> a unique set of values in each record).
>
> TIA
>
> Paul Christidis
>
> ...
> ...
> setvar _eof   FINFO(hpstdin,"eof") + 1
> while SETVAR(_eof, _eof - 1) <> 0 do
>   INPUT _File_Rec
>   setvar _File_Name WORD(_File_Rec, "|", 1)
>   setvar _Doc_Name  WORD(_File_Rec, "|", 2)
>   setvar _Folder    WORD(_File_Rec, "|", 3)
>   setvar _Title     WORD(_File_Rec, "|", 4)
>   if FINFO(_File_Name, "exists") then
>     run capture "!_File_Name;!_Doc_Name;!_Folder;!_Title"
>   endif
> endwhile
> ...
> ...



--
[log in to unmask]
Remainder of .sig suppressed to conserve expensive California electrons...

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2