1. begin != BEGIN --- typo, Thank you!
2. '>' != '>>' --- it is right '>' != '>>', but using '>' is better than '>>' in this thread.
3. depending on the inital assumptions: is it the string 'Header' that segregate the records or is there some other record segregation logic --- agree, hope Jtrinh can talk more about the rule of the file.
How do I loop through the lines of a file?
Each line of the file will be the name of a server.
Like:
server1.stuff.com
server2.stuff.com
For each server I want to do a secure copy of the file to the other server.
This will be a cron job so I guess it needs to run in just SH. I... (3 Replies)
Below is part of a script i have written to loop through part of a port info file. How do i continue the script to get info for OS Device Name, manufacturer and then put information into an array?
HBA Port WWN: 10000000c9420b4b
OS Device Name: /dev/cfg/c10
Manufacturer: Emulex... (5 Replies)
NEWBIE ALERT!
Hi,
I'm 1 month into learning Perl and done reading "Minimal Perl" by Tim Maher (which I enjoyed enoumously). I'm not a programmer by profession but want to use Perl to automate various tasks at my job. I have a problem (obviously) and are looking for your much appreciated help.... (0 Replies)
Hi All,
Following is the program that i have written in cygwin. The redirection of the unfound $param1 to error.txt file doesnt work.Can any one help?
#!/usr/bin/sh
fname=$1
sed 's/ //g' "$fname" > fname1
while read i
do
echo $i > file1
#param1 is script name
... (1 Reply)
Hi Dears,
I use the below code to analyze lines in a file:
for line in `cat ucsv`
do
echo $line
//analyze statements
donehowever, if line contains space char, it will be broken. for example, if file content is:
#login,full name,email,project,role,action
gmwen,Bruce... (3 Replies)
Hello, I have a comma seperated data sheet with multiple fields of biological data. One column contains the ID name of the sample, where there could be more than one sample separated by a comma. I would like a script that reads this field, and for each sample ID, copies the entire line and writes... (18 Replies)
Hey everyone!
I have a tab delimited data set which I want to create an output contained the calculation of number of those lines with a certain value in 2nd and 3rd column.
my input file is like this:
ID1 1 10M AAATTTCCGG
ID2 5 4M ACGT
ID3 5 8M ACCTTGGA
ID4 5 ... (7 Replies)
Good Afternoon,
I start with a file named biglist.txt.
I have another file smallerlist. txt
I want to remove the lines from smallerlist.txt from biglist.txt and leave those lines that do not reside in smallerlist.txt.
Thanks !! (2 Replies)
I've tried numerous commands, but I am not sure how to use sed in a loop. This is what I have:
VARZ contains CARD_FILE_LIST and it also contains CARD_FILE_LIST2
so
echo "$VARZ"
CARD_FILE_LIST
CARD_FILE_LIST2
I have a file with 60 lines in /tmp/testfile it and I want those lines deleted... (3 Replies)
Discussion started by: newbie2010
3 Replies
LEARN ABOUT OSX
net::dns::header
Net::DNS::Header(3) User Contributed Perl Documentation Net::DNS::Header(3)NAME
Net::DNS::Header - DNS packet header
SYNOPSIS
use Net::DNS::Packet;
$packet = new Net::DNS::Packet;
$header = $packet->header;
DESCRIPTION
A "Net::DNS::Header" object represents the header portion of a DNS packet.
METHODS
new
$header = new Net::DNS::Header;
"new" creates a header object appropriate for making a DNS query.
decode
($header, $offset) = decode Net::DNS::Header($data);
Decodes the header record at the start of a DNS packet. The argument is a reference to the packet data.
Returns a Net::DNS::Header object and the offset of the next location in the packet.
Decoding is aborted if the header object cannot be created (e.g., corrupt or insufficient data).
encode
$data = $header->encode;
Returns the header data in binary format, appropriate for use in a DNS query packet.
print
$header->print;
Prints the header record on the standard output.
string
print $header->string;
Returns a string representation of the header object.
id
print "query id = ", $header->id, "
";
$header->id(1234);
Gets or sets the query identification number.
qr
print "query response flag = ", $header->qr, "
";
$header->qr(0);
Gets or sets the query response flag.
opcode
print "query opcode = ", $header->opcode, "
";
$header->opcode("UPDATE");
Gets or sets the query opcode (the purpose of the query).
aa
print "answer is ", $header->aa ? "" : "non-", "authoritative
";
$header->aa(0);
Gets or sets the authoritative answer flag.
tc
print "packet is ", $header->tc ? "" : "not ", "truncated
";
$header->tc(0);
Gets or sets the truncated packet flag.
rd
print "recursion was ", $header->rd ? "" : "not ", "desired
";
$header->rd(0);
Gets or sets the recursion desired flag.
cd
print "checking was ", $header->cd ? "not" : "", "desired
";
$header->cd(0);
Gets or sets the checking disabled flag.
ra
print "recursion is ", $header->ra ? "" : "not ", "available
";
$header->ra(0);
Gets or sets the recursion available flag.
ad
print "The result has ", $header->ad ? "" : "not", "been verified
"
Relevant in DNSSEC context.
(The AD bit is only set on answers where signatures have been cryptographically verified or the server is authoritative for the data and is
allowed to set the bit by policy.)
rcode
print "query response code = ", $header->rcode, "
";
$header->rcode("SERVFAIL");
Gets or sets the query response code (the status of the query).
qdcount, zocount
print "# of question records: ", $header->qdcount, "
";
$header->qdcount(2);
Gets or sets the number of records in the question section of the packet. In dynamic update packets, this field is known as "zocount" and
refers to the number of RRs in the zone section.
ancount, prcount
print "# of answer records: ", $header->ancount, "
";
$header->ancount(5);
Gets or sets the number of records in the answer section of the packet. In dynamic update packets, this field is known as "prcount" and
refers to the number of RRs in the prerequisite section.
nscount, upcount
print "# of authority records: ", $header->nscount, "
";
$header->nscount(2);
Gets or sets the number of records in the authority section of the packet. In dynamic update packets, this field is known as "upcount" and
refers to the number of RRs in the update section.
arcount, adcount
print "# of additional records: ", $header->arcount, "
";
$header->arcount(3);
Gets or sets the number of records in the additional section of the packet. In dynamic update packets, this field is known as "adcount".
COPYRIGHT
Copyright (c)1997-2002 Michael Fuhr.
Portions Copyright (c)2002-2004 Chris Reinhardt.
Portions Copyright (c)2007 Dick Franks.
All rights reserved.
This program is free software; you may redistribute it and/or modify it under the same terms as Perl itself.
SEE ALSO
perl, Net::DNS, Net::DNS::Packet, RFC 1035 Section 4.1.1
perl v5.16.2 2012-01-27 Net::DNS::Header(3)