Hi,
I need to redirect the lines in a file to a different file if the character starting from 2 to 6 in the line are numerical .
Please let me know if anyone have any script to do this.
Thanks,
Ranjit (4 Replies)
Hi all,
I'm looking for some help. I have a file (very long) that is organized like below:
>Cluster 0
0 283nt, >01_FRYJ6ZM12HMXZS... at +/99%
1 279nt, >01_FRYJ6ZM12HN12A... at +/99%
2 281nt, >01_FRYJ6ZM12HM4TS... at +/99%
3 283nt, >01_FRYJ6ZM12HM946... at +/99%
4 279nt,... (4 Replies)
I have a text file, a sample of which is as follows:
r/- * 0: WINDOWS/Microsoft.NET/Framework/v2.0.50727/ASP.NETWebAdminFiles/Images/headerGRADIENT_Tall.gif
r/- * 0: WINDOWS/SoftwareDistribution/Download/cf8ec753e88561d2ddb53e183dc05c3e/backoff.jpg
r/- * 0: ... (2 Replies)
Hi Guys,
Was trying to attempt the below using awk and sed, have no luck so far, so any help would be appreciated.
Current Text File: The first line has got an "\n", and the second line has got spaces/tabs then the word and "\n"
TIME SERVER/CLIENT TEXT... (6 Replies)
Hi,
I am trying to locate the occurences of certain pattern like 'Possible network disconnect' in a text file. I can get the actual lines matching the pttern using:
grep -w 'Possible network disconnect' file_name.
But I am more interested in getting the timing of these events which are... (7 Replies)
I need to search for two patterns in a file and find number of matching lines.
find . -type f | xargs grep "DROP TABLE" | wc -l
find . -type f | xargs grep "DROP SYNONYM" | wc -l
The above code works. However I am looking at finding a commnd that will simplify as on a singe command... (2 Replies)
Hi all,
I want to search for strings in file1 that can be found in file2 and print out the whole line when matching pattern is found.
I have used the below command, but this is not working for me, because it is writing out only the matching patterns from file2, not the whole line.
fgrep -o... (2 Replies)
'Hi
I'm using the following code to extract the lines(and redirect them to a txt file) after the pattern match. But the output is inclusive of the line with pattern match.
Which option is to be used to exclude the line containing the pattern?
sed -n '/Conn.*User/,$p' > consumers.txt (11 Replies)
Hi all!
Thanks for taking the time to view this!
I want to grep out all lines of a file that starts with pattern 1 but also does not match with the second pattern.
Example:
Drink a soda
Eat a banana
Eat multiple bananas
Drink an apple juice
Eat an apple
Eat multiple apples
I... (8 Replies)
Hi,
I have a file called abc.txt with the following dates
2016-01-27
2016-01-28
2016-01-29
2016-01-30
2016-01-31
2016-02-01
2016-02-02
2016-02-03
I would like to print all lines below if 2016-01-31 is found, excluding that date.
I use this command --> sed '1,/2016-01-31/d' abc.txt
If... (4 Replies)
Discussion started by: Nagesh_1985
4 Replies
LEARN ABOUT DEBIAN
array::printcols
PrintCols(3pm) User Contributed Perl Documentation PrintCols(3pm)NAME
print_cols, format_cols - Print or format array elements in vertically sorted columns.
SYNOPSIS
"use Array::PrintCols;"
"print_cols @array;"
"print_cols @array, $colspec;"
"print_cols @array, $colspec, $total_width;"
"print_cols @array, $colspec, $total_width, $indent;"
$output = "format_cols" <same arguments as "print_cols">;
"$Array::PrintCols::PreSorted = 0;"
DESCRIPTION
This module exports two subroutine names: "print_cols" and "format_cols".
The "print_cols" subroutine prints the items of "@array" in multiple, alphabetically sorted vertical columns. One, two, or three optional
arguments may be given to "print_cols" to control the width and number of the columns, the total width of the output, and indentation.
Reasonable defaults apply in the absence of the optional arguments (or when given as the empty string or zero). Generally, the minimum
width column is used when possible.
If "$colspec" is given as a non-negative number, it is treated as the minimum width of the column; the actual width will be the maximum of
this value and the lengths of all array items.
If "$colspec" is given as a negative number, its absolute value value is used to determine the total number of columns. However, it cannot
exceed the total number of columns possible based on the maximum length of all the array elements.
If a third argument is supplied, it is used as the total width of the output. The default for this value is the value of the environment
variable $ENV{'COLUMNS'}, if defined, or 80.
If the fourth argument is given, it is used as the indent for all lines printed, which subtracts from the total width of the output. This
value defaults to zero (ie: no indention of the output).
The variable $Array::PrintCols::PreSorted controls whether or not the "print_cols" subroutine will expect its array argument to already be
sorted. If this variable is nil or zero, "print_cols" will cause print out a sorted copy of the input array.
The routine "format_cols" is called exactly like "print_cols" but returns the formatted result as a string, rather than printing it.
EXAMPLES
use Array::PrintCols;
@commands = sort qw( use list put get set quit help server );
# print in three columns with an indention of 1.
print_cols @commands, -3, 0, 1;
# print the formatted result data to the result file
print RESULTFILE format_cols @result_data;
AUTHOR
Copyright (C) 1995-1998 Alan K. Stebbens <aks@sgi.com>
This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2 of the License, or (at your option) any later version.
This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation,
Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
BUGS
With Perl, you cannot default intervening arguments by leaving them empty; you must supply a zero or empty-string ('').
perl v5.10.0 2008-05-12 PrintCols(3pm)