The utility align is more general, results for align filename:
Note that by default numbers are right-adjusted, other strings left. See: align for details.
Hi All
How do I allign these lines html,thank you
<span class="time"><strong>
06:00
</strong></span>
<div class="cDesc" style="display: none">
TEXTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTT
</div>
<div class="cTitle" style="display: none"> ... (3 Replies)
Hi,
I wrote the following script:
#! /bin/bash
for ((i = 1600; i < 3700; i = i + 100))
do
awk '{if ($16 > "'$i'"-101 && $16 < "'$i'") print $0 }' prova > prova1
done
which is supposed to print, from the original file "prova" in the new file prov1 , only the data that at the... (2 Replies)
Hi
I have an SQL which returns me the o/p as below in an unformatted manner
Table Size No.
=============================================
DEF 22 2
PAF 3 1
99D 12 1
USERS 6 1
04D 4 ... (4 Replies)
Hi
Below command is returning the list of files which having this string "MTL_SYSTEM_ITEMS".
find . -name "*"|xargs grep -il MTL_SYSTEM_ITEMS
Ex: Above command is returing 2 files (Out of 10 files 2 files having this string). ./file1.txt and ./file2.txt
Here I want to append... (3 Replies)
Dear All
I have a script file like the following:
.....
.....
Variable_1 = 888
Variable_2 = 999
.....
MyExternalProgram Myfile
.....
The line MyExternalProgram Myfile will generate some number, Say 777
Now I hope I can output the result of above codes to a text file,... (2 Replies)
Experts ,
In the given output of the log file, the 2nd field that is separated by "|" pipe is not aligned well due to the uneven data length, I would like it to align the 2nd column with 37 length (that is disturbed in the output) including the pipe . The two pepe "|" would be in a aligned way... (2 Replies)
Currently I have a perl code to combine two different files.
#! /usr/bin/perl -w
use strict;
open FP1,"A.txt";
open FP2,"B.txt";
my ($l1,$l2);
while(1)
{
$l1=<FP1>; chomp $l1;
$l2=<FP2>; chomp $l2;
last unless(defined $l1 or defined $l2);
print "$l1 $l2\n";
}
close FP2;... (4 Replies)
I am trying using awk to open an input file and check a column 2/field $2 and if there is a warning then that is displayed (variantchecker): G not found at position 459, found A instead. The attached Sample1.txt is that file. If in that column/field there is a black space, then the text after... (6 Replies)
Hi all
I have created a script to allow me to gain a number of file times and how long they take to execute. I have been asked to get the average time for the log. The log will update every 5 minutes and never be empty.
141
152
157
161
168
169
171
179
202
207
229
651
666
714... (3 Replies)
Discussion started by: simpsa27
3 Replies
LEARN ABOUT DEBIAN
net::smtp::server::client
Server::Client(3pm) User Contributed Perl Documentation Server::Client(3pm)NAME
Net::SMTP::Server::Client - Client session handling for Net::SMTP::Server.
SYNOPSIS
use Carp;
use Net::SMTP::Server;
use Net::SMTP::Server::Client;
use Net::SMTP::Server::Relay;
$server = new Net::SMTP::Server('localhost', 25) ||
croak("Unable to handle client connection: $!
");
while($conn = $server->accept()) {
# We can perform all sorts of checks here for spammers, ACLs,
# and other useful stuff to check on a connection.
# Handle the client's connection and spawn off a new parser.
# This can/should be a fork() or a new thread,
# but for simplicity...
my $client = new Net::SMTP::Server::Client($conn) ||
croak("Unable to handle client connection: $!
");
# Process the client. This command will block until
# the connecting client completes the SMTP transaction.
$client->process || next;
# In this simple server, we're just relaying everything
# to a server. If a real server were implemented, you
# could save email to a file, or perform various other
# actions on it here.
my $relay = new Net::SMTP::Server::Relay($client->{FROM},
$client->{TO},
$client->{MSG});
}
DESCRIPTION
The Net::SMTP::Server::Client module implements all the session handling required for a Net::SMTP::Server::Client connection. The above
example demonstrates how to use Net::SMTP::Server::Client with Net::SMTP::Server to handle SMTP connections.
$client = new Net::SMTP::Server::Client($conn)
Net::SMTP::Server::Client accepts one argument that must be a handle to a connection that will be used for communication.
Once you have a new client session, simply call:
$client->process
This processes an SMTP transaction. THIS MAY APPEAR TO HANG -- ESPECIALLY IF THERE IS A LARGE AMOUNT OF DATA BEING SENT. Once this method
returns, the server will have processed an entire SMTP transaction, and is ready to continue.
Once $client->process returns, various fields have been filled in. Those are:
$client->{TO} -- This is an array containing the intended
recipients for this message. There may be
multiple recipients for any given message.
$client->{FROM} -- This is the sender of the given message.
$client->{MSG} -- The actual message data. :)
AUTHOR AND COPYRIGHT Net::SMTP::Server / SMTP::Server is Copyright(C) 1999, MacGyver (aka Habeeb J. Dihu) <macgyver@tos.net>. ALL RIGHTS
RESERVED.
You may distribute this package under the terms of either the GNU General Public License or the Artistic License, as specified in the Perl
README file.
SEE ALSO
Net::SMTP::Server::Server, Net::SMTP::Server::Relay
perl v5.10.1 1999-12-28 Server::Client(3pm)