08-25-2008
This is a sample of log:
Aug 25 13:23:56 ftwslipmp002 /apps../dhcpd[8092]: [ID 985565 user.warning] No DHCP lease available to offer from subnet 172.22.231.0.
This is what I did to get the IP address:
/usr/bin/egrep -e "`date -u +"%b %e"`" /var/adm/qip | grep DHCP | egrep -v -e "Bad packet" | grep -v DHCP_ | grep No | /usr/bin/awk '{print $17}' | sed 's/\.$//'
The result is: 172.22.231.0
Thanks for your help.
10 More Discussions You Might Find Interesting
1. UNIX for Dummies Questions & Answers
How do i increase the timeout period of a telnet session? (4 Replies)
Discussion started by: Nadeem Mistry
4 Replies
2. Shell Programming and Scripting
I need to keep track of this output
echo "dis chs(*)" | runmqsc | grep RUNNING | wc -l
I need to record that count once an hour 24 hours a day and write to a file with the date and time it was run. Any idea on how to do this. (5 Replies)
Discussion started by: csaunders
5 Replies
3. Shell Programming and Scripting
hello,
I have the following basic script which input the period, but I would like to output is period -1.. how?
echo Please input period (yyyymm):
read PERIOD
OUTPUT=$PERIOD -1
echo " you request period -1 is $OUT"
input 200705
output 200704
input 200701
output 200612
The above... (4 Replies)
Discussion started by: happyv
4 Replies
4. UNIX for Dummies Questions & Answers
Hi,
My apologies if this question is so trivial ... I guess there really is a room for dummies ... :o
Anyway, just wanting to know if someone can please explain what the dot (.) infront of the command or script does and why it works and does not work in the following?
... (1 Reply)
Discussion started by: newbie_01
1 Replies
5. HP-UX
Hi everyone,
I want to use grep to search a patern in a folder. But the folder contains millions of files which makes a big delay if I want to search all the files in the folder. I have been trying to use grep to search the last 10 days of all the files. but no success yet! could you advice? ... (2 Replies)
Discussion started by: messi777
2 Replies
6. Red Hat
how to increase quota grace period of a paticular user (4 Replies)
Discussion started by: ramuk
4 Replies
7. Shell Programming and Scripting
i need a text file which contains all dates between given period i.e 01.05.2011 to 12.06.2011
Pls help (1 Reply)
Discussion started by: suryanarayana
1 Replies
8. Shell Programming and Scripting
I need to add a newline after every period.
Here is some sample text.
The mechanisms for this type of conditioning are probably the same in humans. According to PET scans on young adults, when pairing a stimulus with an airpuff produces a conditioned eye blink, activity increases in the... (4 Replies)
Discussion started by: danbroz
4 Replies
9. Shell Programming and Scripting
All,
How to get the list of files through a unix command which exists / created / updated between 8 PM to 11:59 PM from a particular location.
Regards
Oracle User (3 Replies)
Discussion started by: Oracle_User
3 Replies
10. UNIX for Dummies Questions & Answers
The following is a sample of the data I am working with:
ID#___Hour
ID=10008 19
ID=10008 20
ID=10014 19
ID=10014 20
ID=21047 20
Need to get the following output:
ID#_______0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23
ID=10008 ------------------**---
ID=10014 ... (4 Replies)
Discussion started by: c@rlos
4 Replies
LEARN ABOUT DEBIAN
text::trim
Text::Trim(3pm) User Contributed Perl Documentation Text::Trim(3pm)
NAME
Text::Trim - remove leading and/or trailing whitespace from strings
VERSION
version 1.02
SYNOPSIS
use Text::Trim;
$text = " important data
";
$data = trim $text;
# now $data contains "important data" and $text is unchanged
# or:
trim $text; # work in-place, $text now contains "important data"
@lines = <STDIN>;
rtrim @lines; # remove trailing whitespace from all lines
# Alternatively:
@lines = rtrim <STDIN>;
# Or even:
while (<STDIN>) {
trim; # Change $_ in place
# ...
}
DESCRIPTION
This module provides functions for removing leading and/or trailing whitespace from strings. It is basically a wrapper around some simple
regexes with a flexible context-based interface.
EXPORTS
All functions are exported by default.
CONTEXT HANDLING
void context
Functions called in void context change their arguments in-place
trim(@strings); # All strings in @strings are trimmed in-place
ltrim($text); # remove leading whitespace on $text
rtrim; # remove trailing whitespace on $_
No changes are made to arguments in non-void contexts.
list context
Values passed in are changed and returned without affecting the originals.
@result = trim(@strings); # @strings is unchanged
@result = rtrim; # @result contains rtrimmed $_
($result) = ltrim(@strings); # like $result = ltrim($strings[0]);
scalar context
As list context but multiple arguments are stringified before being returned. Single arguments are unaffected. This means that under
these circumstances, the value of $" ($LIST_SEPARATOR) is used to join the values. If you don't want this, make sure you only use single
arguments when calling in scalar context.
@strings = (" hello
", " there
");
$trimmed = trim(@strings);
# $trimmed = "hello there"
local $" = ', ';
$trimmed = trim(@strings);
# Now $trimmed = "hello, there"
$trimmed = rtrim;
# $trimmed = $_ minus trailing whitespace
Undefined values
If any of the functions are called with undefined values, the behaviour is in general to pass them through unchanged. When stringifying a
list (calling in scalar context with multiple arguments) undefined elements are excluded, but if all elements are undefined then the return
value is also undefined.
$foo = trim(undef); # $foo is undefined
$foo = trim(undef, undef); # $foo is undefined
@foo = trim(undef, undef); # @foo contains 2 undefined values
trim(@foo) # @foo still contains 2 undefined values
$foo = trim('', undef); # $foo is ''
FUNCTIONS
trim
Removes leading and trailing whitespace from all arguments, or $_ if none are provided.
rtrim
Like trim() but removes only trailing (right) whitespace.
ltrim
Like trim() but removes only leading (left) whitespace.
UNICODE
Because this module is implemented using perl regular expressions, it is capable of recognising and removing unicode whitespace characters
(such as non-breaking spaces) from scalars with the utf8 flag on. See Encode for details about the utf8 flag.
Note that this only applies in the case of perl versions after 5.8.0 or so.
SEE ALSO
Brent B. Powers' String::Strip performs a similar function in XS.
AUTHOR
Matt Lawrence <mattlaw@cpan.org>
ACKNOWLEDGEMENTS
Terrence Brannon <metaperl@gmail.com> for bringing my attention to String::Strip and suggesting documentation changes.
perl v5.10.1 2010-06-07 Text::Trim(3pm)