Perl Meta character understanding Post: 302445983

Sponsored Content

Top Forums UNIX for Dummies Questions & Answers Perl Meta character understanding Post 302445983 by Ikon on Tuesday 17th of August 2010 09:51:08 AM

08-17-2010

Registered User

Any of the following would match.

Code:

^ = beginning of sting
[01] = this spot can be 0 or 1
[0-3] = this spot can be 0, 1, 2 or 3
\d = Numeric
\. = means a .
\s+ = 1 or more white space (tab or space)
$ = end of string
.+ = 1 or more of any character

the rest appears to give specifics of errors or debug info. $rb12ts{$2} is application specific so its hard to tell.

Code:

   10000000.000000 Somthing here it doesnt care about
   10000010.000000 Somthing here it doesnt care about
   10000020.000000 Somthing here it doesnt care about
   10000030.000000 Somthing here it doesnt care about
   20000000.000000 Somthing here it doesnt care about
   20000010.000000 Somthing here it doesnt care about
   20000020.000000 Somthing here it doesnt care about
   20000030.000000 Somthing here it doesnt care about
   10001000.000000 Somthing here it doesnt care about
   10001010.000000 Somthing here it doesnt care about
   10001020.000000 Somthing here it doesnt care about
   10001030.000000 Somthing here it doesnt care about
   20001000.000000 Somthing here it doesnt care about
   20001010.000000 Somthing here it doesnt care about
   20001020.000000 Somthing here it doesnt care about
   20001030.000000 Somthing here it doesnt care about
   29991939.999999 Somthing here it doesnt care about

Ikon

View Public Profile for Ikon

Find all posts by Ikon

8 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

What is the meta character for the Ctrl button?

In this script I have, it says press Ctrl+W+? for help, but it doesn't do anything. I looked in the script and it binds: bind ^W meta2_character. How do I make it the Ctrl button so I can do Ctrl+W? (There are some other commands that use Ctrl+W+another character/letter/number.)

2. UNIX for Dummies Questions & Answers

Doubt with regexp-meta character

Hi, I am learning reg exp a bit :) Meta char info: {n,m} Matches the preceding character at least n times but not more than m times, for example, 'ba{2,3}b' will find 'baab' and 'baaab' but NOT 'bab' or 'baaaab'. Values are enclosed in braces (curly brackets). Input file: 112 11112...

3. Shell Programming and Scripting

perl command understanding

Hi All, Can you please help me interpret the following command. Which I am not able to understand. Also can you please illustrate what it is used for. perl -pi -e 's/\015//g' text_file.dat Regards

4. UNIX for Dummies Questions & Answers

List files using { } meta character

p { margin-bottom: 0.08in; } How to match all files that end with the release number using the { } meta character in /boot.

5. Shell Programming and Scripting

Perl: Understanding @allwords

Hi guys, Here is the code: my @allwords = (); my %seen=(); foreach my $curr (@allwords) { $seen{$curr} = 1; } @allwords = keys %seen; my question is: what will @allwords now contain, or how would the entries in the @allwords array be different after this manipulation? Thank...

6. Shell Programming and Scripting

Understanding perl statement

can someone help me how to interpret this line? my ($class, $hashref) = @_; my $portfolio = {}; if ($hashref->{portfolio_id}) { ($portfolio) = GEmySQL->get ("select * from portfolio where portfolio.id=$hashref->{portfolio_id}"); } =============== Question: how do...

7. Shell Programming and Scripting

Help understanding some Perl code.

Well, I found myself trying to fix some Perl code (Ive never done any Perl in my life) and I pinpointed the place where the bug could be. But to be sure I have to know what does a few line of code mean: $files_lim =~ (/^\d*$/) $files_lim =~ (/^\d*h$/) $files_age =~ s/h// The code where...

8. Shell Programming and Scripting

Help with perl code understanding

Hi, I need to understand below perl code, can some one advise me. perl -MDate::Parse -e'BEGIN{$main::now=time;$main::old=(time-60*30)}' -nE'if(/^(\w+\s+\d+\s+\d+:\d+:\d+)/) {$t=str2time $1; $t > $old && $t < $now && print}'

LEARN ABOUT DEBIAN

moose::meta::attribute::native::trait::code

Moose::Meta::Attribute::Native::Trait::Code(3pm)	User Contributed Perl Documentation	  Moose::Meta::Attribute::Native::Trait::Code(3pm)

NAME

       Moose::Meta::Attribute::Native::Trait::Code - Helper trait for CodeRef attributes

VERSION

       version 2.0603

SYNOPSIS

	 package Foo;
	 use Moose;

	 has 'callback' => (
	     traits  => ['Code'],
	     is      => 'ro',
	     isa     => 'CodeRef',
	     default => sub {
		 sub { print "called" }
	     },
	     handles => {
		 call => 'execute',
	     },
	 );

	 my $foo = Foo->new;
	 $foo->call;	# prints "called"

DESCRIPTION

       This trait provides native delegation methods for code references.

DEFAULT TYPE

       If you don't provide an "isa" value for your attribute, it will default to "CodeRef".

PROVIDED METHODS

       o   execute(@args)

	   Calls the coderef with the given args.

       o   execute_method(@args)

	   Calls the coderef with the the instance as invocant and given args.

BUGS

       See "BUGS" in Moose for details on reporting bugs.

AUTHOR

       Moose is maintained by the Moose Cabal, along with the help of many contributors. See "CABAL" in Moose and "CONTRIBUTORS" in Moose for
       details.

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.14.2							    2012-06-28			  Moose::Meta::Attribute::Native::Trait::Code(3pm)