comp.lang.idl-pvwave archive: archive » Re: current directory

Home » Public Forums » archive » Re: current directory

Show: Today's Messages :: Show Polls :: Message Navigator
E-mail to friend

Re: current directory [message #34285 is a reply to message #34284]

Sun, 02 March 2003 00:27

R.Bauer
Messages: 1424
Registered: November 1998

Senior Member

David Fanning wrote:

> Ulf-Dietrich Braumann (braumann@izbi.uni-leipzig.de) writes:
>
>> Ok, the very scaring solution (which in fact also runs under IDL5.0)
>> comes here (just before I go home now ...):
>
> Wow. That could be useful. :-)
>
> Here is the program stripped of some control characters
> that got embedded somehow when you sent it:

Here is an other version to make it more readable.

I like using functions to get code more readable.
within brackets is a routine which could solve a lot of extraction problems.
one other is within_delimiter which you find in the library too

file_path_name_ext is used to extract from a given file location it's path
it's name and it's extension.

http://www.fz-juelich.de/icg/icg-i/idl_icglib/idl_source/idl _html/dbase/download/within_backets.tar.gz
or as idl binary
http://www.fz-juelich.de/icg/icg-i/idl_icglib/idl_source/idl _html/dbase/download/within_brackets.sav

http://www.fz-juelich.de/icg/icg-i/idl_icglib/idl_source/idl _html/dbase/download/file_path_name_ext.tar.gz
or as idl binary
http://www.fz-juelich.de/icg/icg-i/idl_icglib/idl_source/idl _html/dbase/download/file_path_name_ext.sav

PRO Tester
Help, Calls=callStack
r=within_brackets(callStack[0],brackets=['<','('])
fpe=file_path_name_ext(r)
print,fpe.path
END

best regards

Reimar

>
> PRO Tester
> Help, Calls=callStack
> thisRoutine = (Str_Sep(StrCompress(callStack[0])," "))[0]
> callingRoutine = (Str_Sep(StrCompress(callStack[1])," "))[0]
> Print, 'In ' + thisRoutine + ', which is called by ' + $
> callingRoutine + '.'
> thisRoutine = StrLowCase(thisRoutine) + '.pro'
> thePath=strmid(StrMid(callStack[0], 0, $
> StrPos(callStack[0],thisRoutine)), $
> StrPos(StrMid(callStack[0], 0, $
> StrPos(callStack[0],thisRoutine)),'<')+1, $
> StrLen(StrMid(callStack[0], 0, $
> StrPos(callStack[0],thisRoutine))) - $
> StrPos(StrMid(callStack[0], 0, $
> StrPos(callStack[0],thisRoutine)),'<'))
> Print, 'The file "' + thisRoutine + '" is in this directory: ' + thePath
> END
>
> Remember (those of you who faithfully update your
> IDL version), this requires the obsolete STR_SEP
> function. :-)
>
> Cheers,
>
> David

--
Forschungszentrum Juelich
email: R.Bauer@fz-juelich.de
http://www.fz-juelich.de/icg/icg-i/
============================================================ ======
a IDL library at ForschungsZentrum Juelich
http://www.fz-juelich.de/icg/icg-i/idl_icglib/idl_lib_intro. html

Report message to a moderator

[Message index]

		Re: current directory By: R.Bauer on Mon, 03 March 2003 09:16
		Re: current directory By: JD Smith on Mon, 03 March 2003 09:05
		Re: current directory By: Timm Weitkamp on Mon, 03 March 2003 09:00
		Re: current directory By: David Fanning on Sun, 02 March 2003 07:39
		Re: current directory By: Ulf-Dietrich Braumann on Sun, 02 March 2003 06:48
		Re: current directory By: R.Bauer on Sun, 02 March 2003 00:27
		Re: current directory By: David Fanning on Sat, 01 March 2003 16:03
		Re: current directory By: Ulf-Dietrich Braumann on Sat, 01 March 2003 14:44
		Re: current directory By: David Fanning on Sat, 01 March 2003 11:35
		Re: current directory By: R.Bauer on Sat, 01 March 2003 10:10
		Re: current directory By: R.Bauer on Sat, 01 March 2003 09:54
		Re: current directory By: David Fanning on Sat, 01 March 2003 07:01
		Re: current directory By: David Fanning on Sat, 01 March 2003 06:51
		Re: current directory By: Timm Weitkamp on Tue, 04 March 2003 02:13

Previous Topic:	Re: dynamically naming variables
Next Topic:	dlm returning ptr array and string array

-=] Back to Top [=-

[ Syndicate this forum (XML) ] [

] [

]

Current Time: Fri Oct 10 09:33:18 PDT 2025

Total time taken to generate the page: 0.47833 seconds