Sponsored Content
Full Discussion: Perl parse string
Top Forums Programming Perl parse string Post 302773767 by Skrynesaver on Thursday 28th of February 2013 04:26:25 PM
Old 02-28-2013
Code:
#! /usr/bin/perl
use strict;

use Getopt::Long;
my $OPT = {};
my ($version,$help_flag);
my $OPT=GetOptions(
    "ver=s" =>\$version,
    "help|h" =>\$help_flag
)or die "options parsing failed";
my %versions=(
r1=>"3DE4_linux64_r1" ,
r2b2=>"3DE4_linux64_r2b2" ,
r2=>"3DE4_linux64_r2",
r3b1=>"3DE4_linux64_r3b1");
print $versions{$version}?$versions{$version}:"$version is not a valid version string" , "\n";;

 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Perl: Search for string then parse next line

Hi All, I have a file that I need to be able to find a pattern match on one line then parse data on the next or subsequent lines - I will know which line needs to be parsed beforehand. This is what I currently have: while (<COMMAND_OUT>) { if ($_ =~ m/TEST/) { ... (4 Replies)
Discussion started by: pondlife
4 Replies

2. Shell Programming and Scripting

how to parse this string

I want to get filenames from the following input. How can I parse this in bash. input data ------------------------------------------------------------------- path=/aaa/bbb/filename1;/aaa/filename2;/aaa/bbb/ccc/ddd/filename3 -------------------------------------------------------------------... (13 Replies)
Discussion started by: hcliff
13 Replies

3. Shell Programming and Scripting

Parse String from a Variable

Hello, Is there a quick way to parse the values from a variable? The variable has the following sample input: TA= The values of the TA variable is not fixed/hardcoded Basically I need to get the IV_Test and PF_SAPP_FWK values. I created a script that first use sed to remove ,... (3 Replies)
Discussion started by: racbern
3 Replies

4. Shell Programming and Scripting

Parse String Using Sed

Hi, I am wondering if there's a simpler way to extract the second occurrence of a word enclosed in that matches my search criteria. Sample Input is as follows: Error installing feature - com.er.nms.cif.ist.NoMatchingUpgra Error installing feature -... (4 Replies)
Discussion started by: racbern
4 Replies

5. Shell Programming and Scripting

Perl parse string to time

Hi, I have got this value 18:21:23.330 in one of my variables. Now I need to parse this time to something. And then I have to compare it with 2 times, let's say, 15:00 hrs to 23:00 hrs. Can Date::Manip rescue me from this horrifying situation? I am quite new to Perl and especially this... (1 Reply)
Discussion started by: King Nothing
1 Replies

6. Shell Programming and Scripting

Parse string

Hi, I need to parse a string, check if there are periods and strip the string. For example i have the following domains and subdomains: mydomain.com, dev.mydomain.com I need to strip all periods so i have a string without periods or domain extensions: mydomain, devmydomain. I use this for... (12 Replies)
Discussion started by: ktm
12 Replies

7. Shell Programming and Scripting

Perl Parse

Hi I'm writing simple perl script to parse the ftp log as below: Local directory now /home/user/testing 227 Entering Passive Mode (192,254,19,34,8,228). 125 Data connection already open; Transfer starting. 09-25-09 02:33PM 25333629 abc.tar 09-14-09 12:50PM 18015752... (1 Reply)
Discussion started by: netxus
1 Replies

8. Shell Programming and Scripting

parse a mixed alphanumeric string from within a string

Hi, I would like to be able to parse out a substring matching a basic pattern, which is a character followed by 3 or 4 digits (for example S1234 out of a larger string). The main string would just be a filename, like Thisis__the FileName_S1234_ToParse.txt. The filename isn't fixed, but the... (2 Replies)
Discussion started by: keaneMB
2 Replies

9. Shell Programming and Scripting

Perl :: to parse the data from a string.

Hi folks, I have a line in log from which I need to parse few data. Jul 6 00:05:58 dg01aipagnfe01p %FWSM-3-106011: Deny inbound (No xlate) From the above... I need to parse the %FWSM-3-106011: substring. Another example Jul 13 00:08:55 dq01aipaynas01p %FWSM-6-302010: 2 in use, 1661... (3 Replies)
Discussion started by: scriptscript
3 Replies

10. Shell Programming and Scripting

Perl to parse

The below code works great to parse out a file if the input is in the attached SNP format ">". perl -ne 'next if $.==1; while(/\t*NC_(\d+)\.\S+g\.(\d+)()>()/g){printf("%d\t%d\t%d\t%s\t%s\n",$1,$2,$2,$3,$4,$5)}' out_position.txt > out_parse.txt My question is if there is another format in... (10 Replies)
Discussion started by: cmccabe
10 Replies
MooseX::Getopt::ProcessedArgv(3)			User Contributed Perl Documentation			  MooseX::Getopt::ProcessedArgv(3)

NAME
MooseX::Getopt::ProcessedArgv - MooseX::Getopt::ProcessedArgv - Class containing the results of process_argv SYNOPSIS
use My::App; my $pa = My::App->process_argv(@params); my $argv_copy = $pa->argv_copy(); my $extra_argv = $pa->extra_argv(); my $usage = $pa->usage(); my $constructor_params = $pa->constructor_params(); my $cli_params = $pa->cli_params(); DESCRIPTION
This object contains the result of a "process_argv" in MooseX::Getopt call. It contains all the information that "new_with_options" in MooseX::Getopt uses when calling new. METHODS
argv_copy Reference to a copy of the original @ARGV array as it originally existed at the time of "new_with_options". extra_arg Arrayref of leftover @ARGV elements that Getopt::Long did not parse. usage Contains the Getopt::Long::Descriptive::Usage object (if Getopt::Long::Descriptive is used). constructor_params Parameters passed to process_argv. cli_param Command-line parameters parsed out of @ARGV. AUTHORS
o Stevan Little <stevan@iinteractive.com> o Brandon L. Black <blblack@gmail.com> o Yuval Kogman <nothingmuch@woobling.org> o Ryan D Johnson <ryan@innerfence.com> o Drew Taylor <drew@drewtaylor.com> o Tomas Doran <bobtfish@bobtfish.net> o Florian Ragwitz <rafl@debian.org> o Dagfinn Ilmari Mannsaaker <ilmari@ilmari.org> o var Arnfjoer` Bjarmason <avar@cpan.org> o Chris Prather <perigrin@cpan.org> o Karen Etheridge <ether@cpan.org> o Jonathan Swartz <swartz@pobox.com> COPYRIGHT AND LICENSE
This software is copyright (c) 2012 by Infinity Interactive, Inc. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself. perl v5.16.2 2012-08-30 MooseX::Getopt::ProcessedArgv(3)
All times are GMT -4. The time now is 08:48 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy