Hi,
I keep having to remove lines have an IP address as the second field from my awstats logs, as it makes the processing fail.
Rather than do it individually each time (once or twice a week) it fails, I'd like to remove any lines from the file that have 3 digits and then a dot as the start... (1 Reply)
This is related to one of my previous post but now with a slight difference: I need the "Updated:" to be in one line as well as the "Information:" on one line as well. These are in multiple lines right now as seen below. These can have 2 or more lines that needs to be in one line.
System name:... (8 Replies)
Is it possible to remove empty lines between >humid-sets (bold) and also humidset that start with -- (for ex: > humid3 | () : | (+) )
Thanx in advance
Note: The humid sets will be in thousands and lines will be more than 100 thousand.
input
> humid1 | () : | (+)... (7 Replies)
I can't decide if I should use AWK or PERL after pouring over these forums for hours today I decided I'd post something and see if I couldn't get some advice.
I've got a text file full of hundreds of events in this format:
Record Number : 1
Records in Seq : ... (3 Replies)
Hi, I have multiple large files which consist of the below format:
I am trying to write an awk or sed script to remove all occurrences of the 00 record except the first and remove all of the 80 records except the last one.
Any help would be greatly appreciated. (10 Replies)
Oracle Linux 6.4/Bash
I have a file like below. I want to remove all lines which start with # character. Can I do this vi editor ? If not , which other utility can I use for this ?
# This is a test script
CUSER=`id |cut -d"(" -f2 | cut -d ")" -f1`
# Some text
CDATE=`date +%y%m%d` ## get... (3 Replies)
I am trying to combine lines with these conditions:
1. First line starts with text of "libname VALUE db2 datasrc" where VALUE can be any text.
2. If condition1 is met then continue to combine lines through a line that ends with a semicolon.
3. Ignore case when matching patterns and remove any... (5 Replies)
In the awk below, what I am attempting to do is check each line in the tab-delimeted input, which has ~20 lines in it, for a keyword
SVTYPE=Fusion. If the keyword is found I am splitting $3 using the . (dot) and reading the portion before and after the dot in an array a.
If it does have that... (12 Replies)
In the awk piped to sed below I am trying to format file by removing the odd xxxx_digits and whitespace after, then move the even xxxx_digit to the line above it and add a space between them. There may be multiple lines in file but they are in the same format. The Filename_ID line is the last line... (4 Replies)
Discussion started by: cmccabe
4 Replies
LEARN ABOUT CENTOS
tk::x11font
X11Font(3) User Contributed Perl Documentation X11Font(3)NAME
Tk::Font - a class for finding X Fonts
SYNOPSIS
use Tk::X11Font;
$font = $widget->X11Font(foundry => 'adobe',
family => 'times',
point => 120
);
$font = $widget->X11Font('*-courier-medium-r-normal-*-*');
DESCRIPTION
This module can be use to interrogate the X server what fonts are
avaliable.
METHODS
Foundry( [ $val ] )
Family( [ $val ] )
Weight( [ $val ] )
Slant( [ $val ] )
Swidth( [ $val ] )
Adstyle( [ $val ] )
Pixel( [ $val ] )
Point( [ $val ] )
Xres( [ $val ] )
Yres( [ $val ] )
Space( [ $val ] )
Avgwidth( [ $val ] )
Registry( [ $val ] )
Encoding( [ $val ] )
Set the given field in the font name to $val if given and return the current or previous value
Name( [ $max ] )
In a list context it returns a list of all font names that match the fields given. It will return a maximum of $max names, or 128 if $max
is not given.
In a scalar contex it returns the first matching name or undef
Clone( [ key => value, [ ...]] )
Create a duplicate of the curent font object and modify the given fields
AUTHOR
Graham Barr <Graham.Barr@tiuk.ti.com>
HISTORY
11-Jan-96 Initial version
08-Nov-98 Renamed for Tk800.012
COPYRIGHT
Copyright (c) 1995-1996 Graham Barr. All rights reserved. This program is free software; you can redistribute it and/or modify it under the
same terms as Perl itself.
perl v5.16.3 2014-06-10 X11Font(3)