Sponsored Content
Top Forums Shell Programming and Scripting PERL - traverse sub directories and get test case results Post 302486438 by ravi.videla on Saturday 8th of January 2011 04:33:22 PM
Old 01-08-2011
PERL - traverse sub directories and get test case results

Hello,

I need help in creating a PERL script for parsing test result files to get the results (pass or fail). Each test case execution generates a directory with few files among which we are interested in .result file.

Lets say Testing is home directory. If i executed 2 test cases. It will create case1, case2 under Testing directory. Below is sample content of .result files present in case directories.

Testing/case1/file1.result
Code:
test case name:    testcase1.txt
passed:           1
failed:           0

Trial    Trial Start Time             Result
1    20110106 06:15:19.044 PST    PASSED

Testing/case2/file2.result
Code:
test case name:    testcase2.txt
passed:           1
failed:           0

Trial    Trial Start Time             Result
1    20110106 06:15:19.044 PST    FAILED

Script should traverse through sub directories, read .result file, get the last word in last line (1st file contains PASSED, 2nd contains FAILED). Now this result should be updated in testing XL based on test case name. Below is content of testing XL.

contents of XL before running script
Code:
S.No    TestCaseName    Result
1    testcase1.txt    
2    testcase2.txt

contents of XL after running script
Code:
S.No    TestCaseName    Result
1    testcase1.txt    PASSED
2    testcase2.txt    FAILED

Appreciate your help on this.

Last edited by ravi.videla; 01-08-2011 at 06:09 PM..
 

8 More Discussions You Might Find Interesting

1. UNIX for Dummies Questions & Answers

Fastest way to traverse through large directories

Hi! I have thousands of sub-directories, and hundreds of thousands of files in them. What is the fast way to find out which files are older than a certain date? Is the "find" command the fastest? Or is there some other way? Right now I have a C script that traverses through and checks... (5 Replies)
Discussion started by: sreedharange
5 Replies

2. HP-UX

Different results from awk, sed, tr in different directories???

I cannot explain why it gives different results when I try the awk, sed, tr command combination with the same input. (aondufd1)psoftfs:/aon/dev/psoft/FSTST88/autosys>echo ${MailFile} + echo mfint003pr.in1* mfint003pr.in1* (aondufd1)psoftfs:/aon/dev/psoft/FSTST88/autosys/scripts>echo ${MailFile}... (2 Replies)
Discussion started by: james_falco
2 Replies

3. Programming

Ignore case in a test?

How do I ignore the case in an if condition..? EDIT: I put this in the wrong board...this is a linux script. if then echo "Same name." else echo "Different name." fi (1 Reply)
Discussion started by: Bandit390
1 Replies

4. Shell Programming and Scripting

find in given path do not want to traverse to its sub-directories

Hi All, My UNIX Version is: OS Name Release Version AIX appma538 3 5 I want to find certain files with some criterias under the given path. At the same time i want to find the files which resides under the given directory, but normal find traverse to its sub-directories... (4 Replies)
Discussion started by: Arunprasad
4 Replies

5. Shell Programming and Scripting

Prefixing test case methods with letter 'test'

Hi, I have a Python unit test cases source code file which contains more than a hundred test case methods. In that, some of the test case methods already have prefix 'test' where as some of them do not have. Now, I need to add the string 'test' (case-sensitive) as a prefix to those of the... (5 Replies)
Discussion started by: royalibrahim
5 Replies

6. OS X (Apple)

OS X 'find' nogroup/nouser doesn't traverse directories?

flamingo:~ joliver$ sudo find / -nogroup find: /dev/fd/4: No such file or directory find: /home: No such file or directory find: /Library: No such file or directory find: /net: No such file or directory find: /Network: No such file or directory find: /private: No such file or directory find:... (2 Replies)
Discussion started by: jnojr
2 Replies

7. Shell Programming and Scripting

Trying to test for both upper and lower case directories

I am trying to get a script to print out whether a directory is lowercase uppercase or both. This is what I've got so far: echo -e read "enter name" read server for DIR in $(find /tmp/$server -type d -prune | sed 's/\.\///g');do if expr match "$server" "*$" > /dev/null; then echo "$server -... (7 Replies)
Discussion started by: newbie2010
7 Replies

8. Shell Programming and Scripting

Traverse through directories

Hi all, Require help in completing a shell script. i do have a total of 90 directories where in we have different sub-directories and one of the sub directory named logs I need to go inside the logs subdirectory and check if a particular log is present or not. for example below is the... (3 Replies)
Discussion started by: bhaskar t
3 Replies
App::Prove::State::Result(3)				User Contributed Perl Documentation			      App::Prove::State::Result(3)

NAME
App::Prove::State::Result - Individual test suite results. VERSION
Version 3.28 DESCRIPTION
The "prove" command supports a "--state" option that instructs it to store persistent state across runs. This module encapsulates the results for a single test suite run. SYNOPSIS
# Re-run failed tests $ prove --state=failed,save -rbv METHODS
Class Methods "new" my $result = App::Prove::State::Result->new({ generation => $generation, tests => \%tests, }); Returns a new "App::Prove::State::Result" instance. "state_version" Returns the current version of state storage. "test_class" Returns the name of the class used for tracking individual tests. This class should either subclass from "App::Prove::State::Result::Test" or provide an identical interface. "generation" Getter/setter for the "generation" of the test suite run. The first generation is 1 (one) and subsequent generations are 2, 3, etc. "last_run_time" Getter/setter for the time of the test suite run. "tests" Returns the tests for a given generation. This is a hashref or a hash, depending on context called. The keys to the hash are the individual test names and the value is a hashref with various interesting values. Each k/v pair might resemble something like this: 't/foo.t' => { elapsed => '0.0428488254547119', gen => '7', last_pass_time => '1219328376.07815', last_result => '0', last_run_time => '1219328376.07815', last_todo => '0', mtime => '1191708862', seq => '192', total_passes => '6', } "test" my $test = $result->test('t/customer/create.t'); Returns an individual "App::Prove::State::Result::Test" instance for the given test name (usually the filename). Will return a new "App::Prove::State::Result::Test" instance if the name is not found. "test_names" Returns an list of test names, sorted by run order. "remove" $result->remove($test_name); # remove the test my $test = $result->test($test_name); # fatal error Removes a given test from results. This is a no-op if the test name is not found. "num_tests" Returns the number of tests for a given test suite result. "raw" Returns a hashref of raw results, suitable for serialization by YAML. perl v5.16.3 2013-05-02 App::Prove::State::Result(3)
All times are GMT -4. The time now is 06:59 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy