If you only keep in a buffer the data, why not use printf for write directly
But I still don't understand some partes in the script, why do you use fields and campos variables? Is correct to print a line with less than 17 fields and another with exactly 17 fields in the same line?
When i run my C program which dynamically creates the output file, the program stops after sometime and gives the error "File size limit exceeded" even though my working directory has space.Can anyone plz help me out. (13 Replies)
Would appreciate some help, system was displaying an error regarding the kernal when a "sar" was run, after a reboot we get "WARNING user login limit exceeded by 1 user". We have plenty of licences. any ideas? (1 Reply)
Can you help. My server sunning solaris 9 on x86 platform pretty much hung for a few hours... I could not use telnet or ssh to the box - it kept refusing connection. A few hours later - I was able to log in again.
The server has not rebooted but here are the first errors in the messages log... (5 Replies)
Hello -
O/S is UnixWare 7.1.4
My prefered method of copying files between servers is 'rcp', which does not recognize symbolic links; therefore, files are duplicated many times over.
To avoid this duplication, I would like to use 'tar' and/or 'cpio' and pipe them through 'rcp', but... (1 Reply)
Hi,
How to write a script which checks the size of a log file?
I want that the log file contents to get cleared as soon as it increases 1 KB.
Thanks (3 Replies)
My code is
awk '{
out=split(FILENAME,a,"/")
sub(/\./,"_",a)
sub(/\-/,"_",a)
NEWSTRING="main_"a"_"a"(" # The word we want to insert
gsub(/main\(/,NEWSTRING); # the word to be replaced
print "Main becomes ",NEWSTRING")","in file ",FILENAME >> "/home/ds2/test/NEW2.txt" ... (4 Replies)
Hello Everyone,
I am new to this forum and also unix/linux. Our application today threw an alert whcih read as
"The users active count on host has crossed the threshold limit of 50
and is standing at 65."
This was although cleared when I restarted tomcat. But I am not sure why this count... (0 Replies)
We are having issues with our Postfix. The POP and IMAP services randomly stops working an sent e-mails return a "Command time limit exceeded".
We've found out that running these command fix the problem:
service cyrus-imapd stop
rm /var/lib/imap/tls_sessions.db*
rm... (2 Replies)
Hi,
Trying to join 2 files with awk (file1 has variable number of fields; file 2 has constant number of fields)
file1:
hook1|AA|BB|CC|DD
hook2|EE|FF
file2:
hook1|11|22
hook2|33|44
hook3|55|66
output:
hook1|11|22|AA|BB|CC|DD
hook2|33|44|EE|FF
hook3|55|66
What I tried so far:... (3 Replies)
Hello Friends,
I'm trying something hard (for me) to create a report script,normally the following script works:
Echos are just for cosmetic touch,
echo -n "\n-----\t----------\t-------------\t\t--------------\t\t--------\n
COUNT\tEVENT_TYPE\tRESPONSE_CODE\t\tINTERNAL_ERROR\t\tFLOWNAME... (7 Replies)
Discussion started by: EAGL€
7 Replies
LEARN ABOUT MOJAVE
net::hostent5.18
Net::hostent(3pm) Perl Programmers Reference Guide Net::hostent(3pm)NAME
Net::hostent - by-name interface to Perl's built-in gethost*() functions
SYNOPSIS
use Net::hostent;
DESCRIPTION
This module's default exports override the core gethostbyname() and gethostbyaddr() functions, replacing them with versions that return
"Net::hostent" objects. This object has methods that return the similarly named structure field name from the C's hostent structure from
netdb.h; namely name, aliases, addrtype, length, and addr_list. The aliases and addr_list methods return array reference, the rest
scalars. The addr method is equivalent to the zeroth element in the addr_list array reference.
You may also import all the structure fields directly into your namespace as regular variables using the :FIELDS import tag. (Note that
this still overrides your core functions.) Access these fields as variables named with a preceding "h_". Thus, "$host_obj->name()"
corresponds to $h_name if you import the fields. Array references are available as regular array variables, so for example "@{
$host_obj->aliases() }" would be simply @h_aliases.
The gethost() function is a simple front-end that forwards a numeric argument to gethostbyaddr() by way of Socket::inet_aton, and the rest
to gethostbyname().
To access this functionality without the core overrides, pass the "use" an empty import list, and then access function functions with their
full qualified names. On the other hand, the built-ins are still available via the "CORE::" pseudo-package.
EXAMPLES
use Net::hostent;
use Socket;
@ARGV = ('netscape.com') unless @ARGV;
for $host ( @ARGV ) {
unless ($h = gethost($host)) {
warn "$0: no such host: $host
";
next;
}
printf "
%s is %s%s
",
$host,
lc($h->name) eq lc($host) ? "" : "*really* ",
$h->name;
print " aliases are ", join(", ", @{$h->aliases}), "
"
if @{$h->aliases};
if ( @{$h->addr_list} > 1 ) {
my $i;
for $addr ( @{$h->addr_list} ) {
printf " addr #%d is [%s]
", $i++, inet_ntoa($addr);
}
} else {
printf " address is [%s]
", inet_ntoa($h->addr);
}
if ($h = gethostbyaddr($h->addr)) {
if (lc($h->name) ne lc($host)) {
printf " That addr reverses to host %s!
", $h->name;
$host = $h->name;
redo;
}
}
}
NOTE
While this class is currently implemented using the Class::Struct module to build a struct-like class, you shouldn't rely upon this.
AUTHOR
Tom Christiansen
perl v5.18.2 2013-11-04 Net::hostent(3pm)