08-04-2011
Thank you for your replies. The perl script worked like a charm. Thank you very much
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
Hi,
I have a file with multiple paragraph. I want to look for some word and make that paragraph bold. How can I do that?
Thanks,
Karthik (3 Replies)
Discussion started by: caprikar
3 Replies
2. UNIX for Dummies Questions & Answers
hi all:
my solaris FIND does not support
find myFolder -type d -empty
how can i find the empty folders?
thanks! (7 Replies)
Discussion started by: lasse
7 Replies
3. Shell Programming and Scripting
Hi,
I'm trying to find pattern in log file. I'm using awk to search the pattern and print the paragraph. And it's not working well like I want.
The file actually is TCAP message, it has format like this :
...
...
...
*****************************************
INCOMING TCAP MESSAGE
At... (6 Replies)
Discussion started by: kunimi
6 Replies
4. UNIX for Dummies Questions & Answers
Hi,
Consider the following paragraph.
This is line1.
This is line2,
This is last line.
I need the output as
4:This is last line.
i.e The line after the blank line should be displayed along with line number.
I am a unix begineer.Any one please help me to solve this problem (3 Replies)
Discussion started by: Sekar1
3 Replies
5. UNIX for Dummies Questions & Answers
Hi All,
I am checking for a empty input file to do some further action , but I am getting exit status 0 in both the cases , for empty and non empty file both.
The value of $? is coming 0 in if part also and else part too.
#!/bin/ksh
if ]; then
echo "data"
# exit 0
echo "$?"
else... (4 Replies)
Discussion started by: mavesum
4 Replies
6. Shell Programming and Scripting
Hi,
I have read similar questions and I was not able to get a solution, so please help :)
I have two files:
1-Pattern file contains list of patterns
pattern1
pattern2
pattern3
pattern4
....
pattern#
2-input file in the format
>hdhfshsdfjhpattern1xmbxmbxnmv... (4 Replies)
Discussion started by: tbakheet
4 Replies
7. UNIX for Dummies Questions & Answers
Hi, I'm trying to output all text from the first paragraph in a file that contains a specific string through the last paragraph in that file that contains that string.
Previously, I was outputting just each paragraph with that search string with:
cat in_file | nawk '{RS=""; FS="\n";... (2 Replies)
Discussion started by: carpenn
2 Replies
8. Shell Programming and Scripting
Hi, I have A file like this:
>Contig1
AAAAAAATTTTTTCCCAATATATGAT
ATATATAEATATATAT
>Contig2
AAAAAAATTTTTTCCCAATATATGAT
ATATATAEAATTTTTAATTTTTTCCCA
ATCCCAAATATATAT
>Contig3
AAAAAAATTTTTTCCCAATATATGAT
ATATATAEAATTTTTAATTTTTTCCCA
ATCCCAAATAAATTTTTTCCCAATAT
ATGATATATATAEAATTTTTAATTTTT... (3 Replies)
Discussion started by: the_simpsons
3 Replies
9. Shell Programming and Scripting
I know this is a challenging, its about comparing a 3 paragraph, from a whois command, i want to print what is the data that is not unique, example below is the admin phone and techphone, the rest is the same.it will print the correct and wrong
# whois google.com| sed -n '/Registry Registrant... (3 Replies)
Discussion started by: kenshinhimura
3 Replies
10. UNIX for Dummies Questions & Answers
I am using OSX. I have a multi-mol2 file (text file with coordinates and info for several molecules). An example of two molecules in the file is given below for molecule1 and molecule 2. The total file contains >50,000 molecules.
I would like to extract out and write to another file only the... (2 Replies)
Discussion started by: Egy
2 Replies
LEARN ABOUT CENTOS
test::script
Test::Script(3) User Contributed Perl Documentation Test::Script(3)
NAME
Test::Script - Basic cross-platform tests for scripts
DESCRIPTION
The intent of this module is to provide a series of basic tests for 80% of the testing you will need to do for scripts in the script (or
bin as is also commonly used) paths of your Perl distribution.
Further, it aims to provide this functionality with perfect platform-compatibility, and in a way that is as unobtrusive as possible.
That is, if the program works on a platform, then Test::Script should always work on that platform as well. Anything less than 100% is
considered unacceptable.
In doing so, it is hoped that Test::Script can become a module that you can safely make a dependency of all your modules, without risking
that your module won't on some platform because of the dependency.
Where a clash exists between wanting more functionality and maintaining platform safety, this module will err on the side of platform
safety.
FUNCTIONS
script_compiles
script_compiles( 'script/foo.pl', 'Main script compiles' );
The "script_compiles" test calls the script with "perl -c script.pl", and checks that it returns without error.
The path it should be passed is a relative unix-format script name. This will be localised when running "perl -c" and if the test fails the
local name used will be shown in the diagnostic output.
Note also that the test will be run with the same perl interpreter that is running the test script (and not with the default system perl).
This will also be shown in the diagnostic output on failure.
script_runs
script_runs( 'script/foo.pl', 'Main script runs' );
The "script_runs" test executes the script with "perl script.pl" and checks that it returns success.
The path it should be passed is a relative unix-format script name. This will be localised when running "perl -c" and if the test fails the
local name used will be shown in the diagnostic output.
The test will be run with the same perl interpreter that is running the test script (and not with the default system perl). This will also
be shown in the diagnostic output on failure.
SUPPORT
All bugs should be filed via the bug tracker at
<http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Test-Script>
For other issues, or commercial enhancement and support, contact the author.
AUTHOR
Adam Kennedy <adamk@cpan.org>
SEE ALSO
prove, <http://ali.as/>
COPYRIGHT
Copyright 2006 - 2009 Adam Kennedy.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
The full text of the license can be found in the LICENSE file included with this module.
perl v5.16.3 2009-11-24 Test::Script(3)