Page MenuHomeHEPForge
Files F8310157

x_val.pl
No OneTemporary
Actions

x_val.pl
View Options

#!/bin/perl
while ($line = <>){
chomp $line;
($rec,$tab,$xcol,$xpt,$v,) = split /;/, $line, 5;
$rec =~ s/^\s+//;
$rec =~ s/\s+$//;
$tab =~ s/^\s+//;
$tab =~ s/\s+$//;
$xcol =~ s/^\s+//;
$xcol =~ s/\s+$//;
$xpt =~ s/^\s+//;
$xpt =~ s/\s+$//;
$v =~ s/^\s+//;
$v =~ s/\s+$//;
print $rec,"\t",$tab,"\t",$xcol,"\t",$xpt,"\t",$v,"\n";
}
exit(0);

File Metadata

Mime Type
text/x-perl
Expires
Sat, Dec 21, 5:32 PM (10 h, 14 m)
Storage Engine
blob
Storage Format
Raw Data
Storage Handle
4023650
Default Alt Text
x_val.pl (369 B)

Event Timeline