On 2023-01-02 12:05:32 J Leslie Turriff wrote:
> On 2023-01-02 11:19:51 Rony G. Flatscher wrote:
> > Dave, could you look at the enclosed sample and give some feedback
> > whether it serves its purpose (demonstrate the new ADDRESS...WITH in an
> > understandable manner)?
> >
> > ---rony
> >
> > On 02.01.2023 14:53, Dave Jones wrote:
> > > Not knowing very much about the new ADDRESS...WITH... feature, I would
> > > think that it would be a very useful example.
> > > DJ
> > >
> > > On Mon, Jan 2, 2023 at 7:08 AM Rony G. Flatscher
> > > <rony.flatsc...@wu.ac.at> wrote:
> > >
> > > One of the many new great features of ooRexx 5.0.0 is the
> > > ADDRESS...WITH variant.
> > >
> > > In order to demonstrate how to use it, here an idea: have a sample
> > > that uses curl command (available
> > > on all modern operating systems) to fetch the latest ooRexx
> > > documentation files from SourceForge and
> > > download them into a subdirectory named docs.V, where "V" would be
> > > the ooRexx version. Supplying the
> > > optional ooRexx version (e.g. "4.2.0", "5.0.0", "5.1.0beta", etc.)
> > > would download all the documentation files from the given SourceForge
> > > oorexx-docs directory.
> > >
> > > What do you think, would that be a helpful sample to add to ooRexx?
> > >
> > > ---rony
>
> 1) "needle" is not very meaningful. Perhaps "component"?
>
> 2) If no directory is supplied, perhaps "ooRexxDocs" should be the default?
>
> 3) After creating ooRexxDocs directory and specifying it on the command
> line, getOoRexxDocs.rex insists that it does not exist:
>
> ~/bin/rexx
>
> | $ mkdir ooRexxDocs
> | @12:01:53,leslie@pinto rc=0
> | ~/bin/rexx
> | $ getOoRexxDocs.rex ooRexxDocs
> | +++ "LINUX COMMAND /home/leslie/bin/rexx/getOoRexxDocs.rex"
> | 42 *-* dirArr=getDirectories() -- get array of available document
> | directories
> |
> | >>> "an Array"
> |
> | +++ Interactive trace. "Trace Off" to end debug, ENTER to continue. +++
> |
> | 45 *-* if .sysCargs[1]~isNil=.false, "/h -h /? -?
> | ?"~caselessPos(.sysCargs[1])>0
> |
> | >>> "1"
> | >>> "0"
> | >>> "0"
> |
> | 55 *-* needle=""
> |
> | >>> ""
> |
> | 56 *-* if arg()>0
> |
> | >>> "1"
> |
> | 56 *-* then
> | 57 *-* do
> |
> | 58 *-* downloadDir=.sysCargs[1] -- desired directory name
> |
> | >>> "ooRexxDocs"
> |
> | 59 *-* needle =.sysCargs[2] -- text fragment file name
> | must possess to
>
> be downloaded
>
> | >>> "The NIL object"
> |
> | 60 *-* if needle~isNil
> |
> | >>> "1"
> |
> | 60 *-* then
> | 60 *-* needle="" -- any file name qualifies for download
> |
> | >>> ""
> |
> | 61 *-* end
> | 65 *-* if downloadDir~isNil | dirArr~hasItem(downloadDir)=.false
> |
> | >>> "1"
> |
> | 65 *-* then
> | 66 *-* do
> |
> | 67 *-* say pp(downloadDir) "does not exist, aborting ..."
> |
> | >>> "[ooRexxDocs] does not exist, aborting ..."
> |
> | [ooRexxDocs] does not exist, aborting ...
> |
> | 68 *-* exit -1
> |
> | >>> "-1"
> |
> | @12:04:04,leslie@pinto rc=255
>
> Leslie
> --
> Platform: GNU/Linux
> Hardware: x86_64
> Distribution: openSUSE Leap 15.4
> Open Object Rexx: 5.0.0 r12286
> Build date: Aug 12 2021
>
>
> _______________________________________________
> Oorexx-devel mailing list
> Oorexx-devel@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/oorexx-devel
Ah... the reason getOoRexxDocs.rex didn't work for me at first is
because curl
needed --noproxy '*' to access SourceForge. With this additional option it
finds the
SourceForge resources and lists them, but so far it has not populated my local
directory
with any files. I have tried
| ~/bin/rexx
| $ getOoRexxDocs 5.1.0beta
| cmd: [curl --silent --list-only --noproxy '*'
https://sourceforge.net/projects/oorexx/files/oorexx-docs/5.1.0beta/]
| # 1:
[https://sourceforge.net/projects/oorexx/files/oorexx-docs/5.1.0beta/ooRexx-5.1.0beta-all.zip]
:
| # 35:
[https://sourceforge.net/projects/oorexx/files/oorexx-docs/5.1.0beta/oodguide.pdf]
|
| downloading ...
| # 1: [curl --silent --remote-time -L -O
https://sourceforge.net/projects/oorexx/files/oorexx-docs/5.1.0beta/ooRexx-5.1.0beta-all.zip]
...
:
| # 35: [curl --silent --remote-time -L -O
https://sourceforge.net/projects/oorexx/files/oorexx-docs/5.1.0beta/oodguide.pdf]
...
| done.
| @16:32:54,leslie@pinto rc=0
| ~/bin/rexx
| $ ll docs.5.1.0beta/
| total 0
| @16:33:04,leslie@pinto rc=0
(N.B. docs.5.1.0beta is empty)
and
|~/bin/rexx
| $ ll docs.5.1.0beta ooRexx-5.1.0beta-pdf.zip
| /bin/ls: cannot access 'ooRexx-5.1.0beta-pdf.zip': No such file or directory
| docs.5.1.0beta:
| total 0
| @16:34:07,leslie@pinto rc=2
Leslie
--
Platform: GNU/Linux
Hardware: x86_64
Distribution: openSUSE Leap 15.4
Open Object Rexx: 5.0.0 r12286
Build date: Aug 12 2021
_______________________________________________
Oorexx-devel mailing list
Oorexx-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/oorexx-devel
