Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: Pattern Matching and extracting the required fields in Perl
Top Forums Shell Programming and Scripting Pattern Matching and extracting the required fields in Perl Post 302622765 by neutronscott on Thursday 12th of April 2012 02:53:31 PM
Old 04-12-2012
Do you really need a bash script and perl script? I could assist with completing the task in purely bash if I better understood what needs to be done.

---------- Post updated at 02:53 PM ---------- Previous update was at 02:44 PM ----------

Code:
#!/bin/bash
prefix1=/home/dev/filter/build/tmpl/
prefix2=/home/dev/filter/build/ovrd/
file_svn='file_svn'

while read -r url _; do
        # skip java files
        [[ $url = *.java ]] && continue
        rel=${url#*/trunk/}
        relpath=${rel%/*}
        [[ -d ${prefix1}$relpath ]] || echo mkdir -p "${prefix1}$relpath"
        [[ -d ${prefix2}$relpath ]] || echo mkdir -p "${prefix2}$relpath"
        echo svn export "$url" "${prefix1}$rel"
done < "$file_svn"

Sample run:

Code:
mkdir -p /home/dev/filter/build/tmpl/feeds/templates
mkdir -p /home/dev/filter/build/ovrd/feeds/templates
svn export https://ims-svnus.com/dev/DB/trunk/feeds/templates/shell_script.txt /home/dev/filter/build/tmpl/feeds/templates/shell_script.txt
mkdir -p /home/dev/filter/build/tmpl/db/sec_db/stored_procedures
mkdir -p /home/dev/filter/build/ovrd/db/sec_db/stored_procedures
svn export https://ims-svnus.com/dev/DB/trunk/db/sec_db/stored_procedures/alter.sql /home/dev/filter/build/tmpl/db/sec_db/stored_procedures/alter.sql

[/code]
This User Gave Thanks to neutronscott For This Post:
filter
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

perl pattern matching

hi i am trying to get digits inside brackes from file , whose structure is defined below CREATE TABLE TELM (SOC_NO CHAR (3) NOT NULL, TXN_AMOUNT NUMBER (17,3) SIGN_ON_TIME CHAR (8) TELLER_APP_LIMIT NUMBER (17,3) FIL01 ... (2 Replies)
Discussion started by: zedex
2 Replies

2. Shell Programming and Scripting

Pattern matching extracting urls from rss, shell scripts

Hi all, how could i do ? I have a Rss file, i want to extract only the Urls (many) matching http://www.xxx.com/trailers/ from that file and copy into another file. like " <pubDate>Wed, 29 Apr 2009 00:00:00 PST</pubDate> <content:encoded><!Apple - Movie Trailers - The Hangover"><img... (3 Replies)
Discussion started by: BremboloIV
3 Replies

3. Shell Programming and Scripting

Problem extracting just a part of a matching pattern

Hello everyone, this is my first post so please give me a hand. I apologize for my English, I'll try to be clear with my request. I need to write a script (Bash) which finds all the variables defined in the file .h of the folder and then writes the name of the files .c where these variables are... (1 Reply)
Discussion started by: paxilpaz
1 Replies

4. Shell Programming and Scripting

help extracting a matching pattern and next lines of match

Hi there, i'm having some problems just making an awk script (i've tried this way, but other way can be posible for sure), for the next file file.txt <register> <createProfile> <result>0</result> <description><!]></description> <msisdn>34661461174</msisdn> <inputOmvID>1</inputOmvID>... (6 Replies)
Discussion started by: vicious
6 Replies

5. Shell Programming and Scripting

Perl Pattern Matching

Hello experts, I have a file containing the following text(shortened here). File Begin ---------- < # Billboard.d3fc1302a677.imagePath=S:\\efcm_T4 < Billboard.d3fc1302a677.imagePath=S:\\efcm_T4 --- > # Billboard.d3fc1302a677.imagePath=S:\\efcm_Cassini >... (2 Replies)
Discussion started by: nmattam
2 Replies

6. Shell Programming and Scripting

Extracting the strings matching a pattern from a word

Hi All , I need to extract the strings that are matching with the pattern : CUST.<AnyStringOfAnyLength>.<AnyStringOfAnyLength> from a file and then write all these string into another file. e.g. If a file SOURCE contains following lines : IF(CUST.ABCD.EFGH==1) THEN CUST.ABCD.EFGH =... (7 Replies)
Discussion started by: swapnil.nawale
7 Replies

7. Shell Programming and Scripting

Extracting a string matching a pattern from a line

Hi All, I am pretty new to pattern matching and extraction using shell scripting. Could anyone please help me in extracting the word matching a pattern from a line in bash. Input Sample (can vary between any of the 3 samples below): 1) Adaptec SCSI RAID 5445 2) Adaptec SCSI 5445S RAID 3)... (8 Replies)
Discussion started by: jharish
8 Replies

8. Shell Programming and Scripting

Korn Shell for pattern matching and extracting

Guys, i'm new to shell scripting. Here's what i need. I need a shell script which would read a file containing only 1 line which never changes. File containts - SQL_Mgd_Svc_ELONMCL54496 |EMEA\brookkev, EMEA\fieldgra, EMEA\tidmamar, EMEA\attfiste, EMEA\baldogar, EMEA\clarkia2, EMEA\conwasha,... (9 Replies)
Discussion started by: butterfly20
9 Replies

9. UNIX for Dummies Questions & Answers

Extracting sub-string matching the pattern.

Hi, I have a string looks like the following: USERS 32767.9844 UNDOTBS1 32767.9844 SYSAUX 32767.9844 SYSTEM 32767.9844 EMS 8192 EMS 8192 EMS_INDEXES 4096 EMS_INDEXES 4096 8 rows selected. How do I extract a sub-string to get the expected output as following: EMS 8192 EMS_INDEXES 4096 ... (3 Replies)
Discussion started by: NetBear
3 Replies

10. Shell Programming and Scripting

sed pattern matching help required

Hi I am trying to pattern match with sed, if it finds a match I need it to insert characters at the 28th position, its working but its also adding an extra space and I don't know why, below is the code. sed 's/715023044/\n&/g' $asn | sed '/^71502304413-000/s/./B4/28' | sed -e :a -e... (4 Replies)
Discussion started by: firefox2k2
4 Replies

LEARN ABOUT CENTOS

cpanplus::shell

CPANPLUS::Shell(3)					User Contributed Perl Documentation					CPANPLUS::Shell(3)

NAME

       CPANPLUS::Shell - base class for CPANPLUS shells

SYNOPSIS

	   use CPANPLUS::Shell; 	    # load the shell indicated by your
					    # config -- defaults to
					    # CPANPLUS::Shell::Default

	   use CPANPLUS::Shell qw[Classic]  # load CPANPLUS::Shell::Classic;

	   my $ui      = CPANPLUS::Shell->new();
	   my $name    = $ui->which;	    # Find out what shell you loaded

	   $ui->shell;			    # run the ui shell

DESCRIPTION

       This module is the generic loading (and base class) for all "CPANPLUS" shells. Through this module you can load any installed "CPANPLUS"
       shell.

       Just about all the functionality is provided by the shell that you have loaded, and not by this class (which merely functions as a generic
       loading class), so please consult the documentation of your shell of choice.

BUG REPORTS

       Please report bugs or other issues to <bug-cpanplus@rt.cpan.org<gt>.

AUTHOR

       This module by Jos Boumans <kane@cpan.org>.

COPYRIGHT

       The CPAN++ interface (of which this module is a part of) is copyright (c) 2001 - 2007, Jos Boumans <kane@cpan.org>. All rights reserved.

       This library is free software; you may redistribute and/or modify it under the same terms as Perl itself.

SEE ALSO

       CPANPLUS::Shell::Default, CPANPLUS::Shell::Classic, cpanp

perl v5.16.3							    2013-05-20							CPANPLUS::Shell(3)
All times are GMT -4. The time now is 05:20 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy