regx(perl) issue

Hi everyone, here is the rquirement, I have to add pathid in datacapture.cfg file. here is the scenario with example,

##### item max="6" min="1" name= "phone">

I have to change it to...

#####item max="6" min="1" name= "phone" pathid="phone">

Here is my perl code..

my $temp="pathid";
$xmltext =~ s/(].*?)/$1 /gi;
$xmltext =~ s/(name)([^>].*?)/name$2 $temp$2/gi;

With this script, I am able to get ...

#####item max="6" min="1" name= pathid= "phone">

I had played around with this code in all possible ways I know, but result is same. I need help from this forum.

Thanks in advance,

Find more posts tagged with

Comments

Phanie

Question - is name of the item is always "phone" in all your datacaptures or do you want the script to be dynamic.

--
Phanie

Evani20

Thanks for your quick response, yes, it works as dynamically. Here is more example :

# item max="1" min="1" name= "hey">
# item max="6" min="1" name= "phone">
# item max="6" min="1" name= "type">

After run the perl script, I got...

# item max="1" min="1" name= pathid= "hey">
# item max="6" min="1" name= pathid= "phone">
# item max="6" min="1" name= pathid= "type">

Thanks in advance,

ISCBorisB

Hi everyone, here is the rquirement, I have to add pathid in datacapture.cfg file. here is the scenario with example,

##### item max="6" min="1" name= "phone">

I have to change it to...

#####item max="6" min="1" name= "phone" pathid="phone">

Here is my perl code..

my $temp="pathid";
$xmltext =~ s/(].*?)/$1 /gi;
$xmltext =~ s/(name)([^>].*?)/name$2 $temp$2/gi;

With this script, I am able to get ...

#####item max="6" min="1" name= pathid= "phone">

I had played around with this code in all possible ways I know, but result is same. I need help from this forum.

Thanks in advance,

Try the following instead of your three lines:

$xmltext =~ s/name="(.+?)"/name="$1" pathid="$1"/gi;

Note that if you are trying to convert IWOV to XML Type that seriously oversimplifies the issue.
In XML Format you would want (at the very least) location attribute for containers instead of pathid,
single root container instead of possible multiple ones etc.

Evani20

Thanks Boris, it works perfectly.

Thanks again.

Nikunj

Hi,
You can use Perl forum to post perl related querry....

new_report.rptdesign

Evani20

Ok, I will remember that for the next time.

Thanks,