Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight

Re: is it possible?

by Old_Gray_Bear (Bishop)
on Aug 13, 2012 at 14:58 UTC ( #987136=note: print w/replies, xml ) Need Help??

in reply to is it possible?

As a matter of pure nosy curiosity, why are using Perl for this project?

Since you are refactoring IBM Basic Assembler, I suspect that you are running on a zOS system. That being the case, I would have turned to REXX, as a 'native' solution, rather than Perl. (Never mind that I'd be doing it inside the ISPF editor and not get involved with a one-off custom conversion tool in the first place....)

REXX (and EXEC2) were written in and for the IBM ecosystem (MVS and VM370/CMS). Perl is cross-ported from the UNIX world. There are different underlying assumptions between the two operating environments, and that may make REXX a better language for the job. Certainly the debugging and performance tools provided by MVS will be a better fit to REXX code than code written in Perl.

I Go Back to Sleep, Now.


Replies are listed 'Best First'.
Re^2: is it possible?
by suno (Acolyte) on Aug 23, 2012 at 04:55 UTC
    Hi PerlMonks!.thanks for the help.. but still i am struggling with this logic... so i kind of trying with my own logic... what i am doing here is, as soon as i encounter 'EX R1,ROUTINE#2' instruction, whatever label(ROUTINE#2)it is pointing to,i am storing that label and the next line to a separate file..that is i am storing 'ROUTINE#2 ST R2,VAR1' to a an intermediate file.then parse the code from the begining.when 'EX R1,ROUTINE#2' is reached, goto the intermediate file and retreive the value corresponding to ''ROUTINE#2'and replace it with the EX statement... i hope this works..i know this is lengthy there any other way i can do it? here i have reached till storing values to the intermediate values... need to do the rest....

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://987136]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (6)
As of 2018-06-19 02:50 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (111 votes). Check out past polls.