07-24-2008
Formatting Data
i am writing a script that reads in a file and i just want it to print each element on a new line here is my code and the data that i want to read in
#!/usr/bin/perl
use strict;
use CGI qw(:standard);
use CGI qw(:cgi);
my $data_file = "/tmp/results.txt";
my $configuration;
my $config_ID;
my $cds_ID ;
open (DAT, $data_file) || die ("could not open file");
my @raw_data = <DAT>;
close(DAT);
print "Content-type: text/html \n\n";
print "<html><body>";
#print "(@raw_data)";
print "</body></html>";
********************data from file************************
txtCfgId=test
txtCfguser=test
txtEmailAdr=
txtPager=test
txtSrvOU=test
txtProject=rhga
pnlServerID=eaga
txtSrvrIP=egar
txtSrvrGW=agae
txtSrvrMask=eaga
lstTimeZone=US%2FCentral
txtDNSDom=aega
txtDNSHold1=efar
txtDNSHold2=ergar
txtDNSHold3=
how do i print this output the way it is stored? the output is printed all on a single line
9 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
Hi All,
I have been trying to re-arrange the below data using AWK or Perl.
Can anybody help me ?
Thanks in advance.
Input:
111 222
333 444
AAA BBB
CCC DDD
555 666
777 888
EEE FFF
GGG HHH
Output: (6 Replies)
Discussion started by: Raynon
6 Replies
2. Shell Programming and Scripting
Hi
I have to convert the data in a file
*******
01-20-09 11:14AM 60928 ABC Valuation-2009.xls
01-20-09 11:16AM 55808 DEF GHI Equation-2009.xls
01-20-09 11:02AM 52736 ABC DF Valuation-2009.xls
01-20-09 11:06AM 89600 THE... (6 Replies)
Discussion started by: shekhar_v4
6 Replies
3. UNIX for Dummies Questions & Answers
How would I get this output to look
$ cat newfile
13114
84652
84148
LIKE THIS?:
13114,84652,84148
sed,cut awk?
syntax? (2 Replies)
Discussion started by: ddurden7
2 Replies
4. Shell Programming and Scripting
I want to check whether if any column data has any + , - , = prefixed to it then convert it in such a form that in excel its not read as formula.
echo "$DATA" | awk 'BEGIN { OFS="," } -F" " {print $1,$2,$3,$4,$5,$6,$7,$8.$9,$10,$11,$12}' (4 Replies)
Discussion started by: dinjo_jo
4 Replies
5. Shell Programming and Scripting
Hello everybody,
I have a file containing some statistics regarding CPU usage. The file has this syntax :
Fri Jul 16 14:27:16 EEST 2010
Cpu(s): 15.2%us, 1.4%sy, 0.0%ni, 82.3%id, 0.1%wa, 0.0%hi, 0.9%si, 0.0%st
Fri Jul 16 15:02:17 EEST 2010
Cpu(s): 15.3%us, 1.4%sy, 0.0%ni, 82.3%id, ... (9 Replies)
Discussion started by: spiriad
9 Replies
6. Shell Programming and Scripting
Hi,
I have data coming in like below. Not all data is like that, these are the problem records that is causing the ETL load to fail. Can you pls help me with combining theese broken records!
001800018000000guyMMAAY~acct name~acct type~~"address part 1
address... (8 Replies)
Discussion started by: varman
8 Replies
7. UNIX for Advanced & Expert Users
HI
I want to make it single row if start with braces i.e. { .Any idea
{1:XXX2460275191}{2:SEC00687921131112201641N}{3:{58910}}{4:
:R:GENL
:C::xx//xx1
:20C::yy//yy1
:2S:xxT}
{1:XXX2460275190}{2:SEC00687921131112201641y}{3:{58911}}{4:
:z:GENL
:v::xx//xx1
:10C::yy//yy1
:4S:xxT
... (2 Replies)
Discussion started by: mohan705
2 Replies
8. Shell Programming and Scripting
Hi,
I am generating the following output from my script.
Country,A,B,C,D,E,F
INDIA ,3755019,774604,484749,329838,7333612,442031
CHINA ,3716520,889197,530899,379754,6198475,355768
JAPAN ,52038,30462,231224,147275,1272,498
USA,9494,1130,0,0,15303,451... (5 Replies)
Discussion started by: karumudi7
5 Replies
9. Shell Programming and Scripting
Need assistance on the data extraction using awk
Below is the format and would like to extract the data in another format
-------------------------------------------------------------------------------------------------
Minimum Temperature (deg F )
DAY 1 2 3 4 5 6 7 8 9 10 11... (4 Replies)
Discussion started by: ajayram_arya
4 Replies
PFUNC(1) User Contributed Perl Documentation PFUNC(1)
NAME
pfunc - grep for perl functions
SYNOPSIS
pfunc subroutine FILES...
DESCRIPTION
pfunc searches the named FILES for all calls to the given subroutine. It will report back the file and line number each call is found on
along with what sort of call it is
function foo()
class method Class->foo()
object method $obj->foo()
EXAMPLE
$ pfunc isa /usr/share/perl/5.6.1/*.pm
Called as function in /usr/share/perl/5.6.1/CGI.pm at line 316
Called as function in /usr/share/perl/5.6.1/CGI.pm at line 327
Called as function in /usr/share/perl/5.6.1/CGI.pm at line 397
Called as function in /usr/share/perl/5.6.1/CGI.pm at line 494
Called as function in /usr/share/perl/5.6.1/CGI.pm at line 495
Called as object method in /usr/share/perl/5.6.1/CPAN.pm at line 4957
Called as function in /usr/share/perl/5.6.1/Dumpvalue.pm at line 191
Called as function in /usr/share/perl/5.6.1/Dumpvalue.pm at line 218
Called as function in /usr/share/perl/5.6.1/Dumpvalue.pm at line 248
Called as function in /usr/share/perl/5.6.1/Dumpvalue.pm at line 251
Called as function in /usr/share/perl/5.6.1/Dumpvalue.pm at line 254
Called as object method in /usr/share/perl/5.6.1/Shell.pm at line 28
Called as object method in /usr/share/perl/5.6.1/base.pm at line 12
NOTES
Its not fast, but its accurate.
AUTHOR
Michael G Schwern <schwern@pobox.com>
SEE ALSO
Module::Info
perl v5.12.1 2002-12-05 PFUNC(1)