Re^4: removing perldata , hashref from XML file

Hi,

Many Thanks for answering me, would you mind please give me a guide where in the code i should add the return value?

!/usr/bin/perl -w
use strict;
use warnings;
use Data::Dumper;
use XML::Dumper;
use TAP3::Tap3edit;
$Data::Dumper::Indent=1;
$Data::Dumper::Useqq=1;
my $dump = new XML::Dumper;
use File::Basename;


my $perl='';
my $xml='';
my $tap3 = TAP3::Tap3edit->new();

foreach my $file(glob 'X*')
{
my $files= basename($file);
my $filename=$files.".xml\n";
print $filename;
$tap3->decode($files) || die $tap3->error;
$perl = $tap3->structure;
$dump->pl2xml($perl, $filename);

}
[download]

Comment on Re^4: removing perldata , hashref from XML file Download Code

Replies are listed 'Best First'.
Re^5: removing perldata , hashref from XML file by AnomalousMonk (Archbishop) on May 16, 2020 at 05:49 UTC
... where ... i should add ... `map{substr$_->[0],$_->[1]\|\|0,1}[\\|\|{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^ARGV,3]` You misunderstand. This is choroba's code "signature" on PerlMonks. `c:\@Work\Perl\monks>perl -wMstrict -e "print map{substr$_->[0],$_->[1]\|\|0,1}[\\|\|{},3],[[]],[ref qr-1,-,-1], +[{}],[sub{}^ARGV,3] " JApH,` [download] `JApH` stands for Just Another Perl Hacker. :) Please consider the advice given in the body of choroba's reply. Give a man a fish: `<%-{-{-{-<`	[reply] [d/l] [select]
Re^6: removing perldata , hashref from XML file by SaraMirabi (Novice) on May 16, 2020 at 05:54 UTC
Oh yeah, I am so new to perl. I updated my code :-(	[reply]
Re^5: removing perldata , hashref from XML file by haukex (Archbishop) on May 16, 2020 at 06:06 UTC
You've just re-posted the code from your first node, it looks like you haven't even tried to incorporate the suggested code. You'll tend to get better responses if you show your efforts. Also, see this: when you edit a node, make sure to mark your updates, so that replies aren't confusing. Anyway, as choroba and I said, the code I showed is a replacement for XML::Dumper, and my example `$data` can be removed and your `$perl` variable can be used instead.	[reply] [d/l] [select]
Re^6: removing perldata , hashref from XML file by SaraMirabi (Novice) on May 16, 2020 at 06:25 UTC
Accept my apalogies. I promise it will never happened again.	[reply]