Core Function Grep
From Sputnik Wiki
(Difference between revisions)
(→Example) |
|||
| Line 1: | Line 1: | ||
<pre> | <pre> | ||
| − | Grep( < | + | Grep( <array>, <pattern>, <flag> ) |
</pre> | </pre> | ||
| Line 8: | Line 8: | ||
=== Parameters === | === Parameters === | ||
| − | |||
| − | |||
| − | |||
| − | |||
==== array ==== | ==== array ==== | ||
The array to use. | The array to use. | ||
| + | |||
| + | ==== pattern ==== | ||
| + | |||
| + | A regular expression pattern to use. | ||
==== flag ==== | ==== flag ==== | ||
Revision as of 11:15, 28 April 2012
Grep( <array>, <pattern>, <flag> )
Contents |
Description
Returns a new array consisting of the elements of the input array that match the given regex pattern.
Parameters
array
The array to use.
pattern
A regular expression pattern to use.
flag
Optional; If the flag is higher than 0 the search will be inverted and everything that does not match will be returned instead of everything that does match. (Default is 0)
Return Value
Success - Returns 1.
Failure - Returns 0.
Remarks
This also includes Hash values with the array values.
Example
Return everything that matches
my $array = array( "Test123", "moo", "cat", "dog555", "meows" ); my $lol = Grep( $array, m/\d+/ ); foreach($lol as $c) { println("Value: $c"); }
Return everything that does not match (by setting the flag to 1)
my $array = array( "Test123", "moo", "cat", "dog555", "meows" ); my $lol = Grep( $array, m/\d+/, 1 ); foreach($lol as $c) { println("Value: $c"); }
In this example it returns all KEYS that match in the Hash(Dictionary) instead of the values
my $array = array( "One" => "Cat", "Two222" => "Fire", "Three" => "FoX", "Four444" => "Water" ); my $lol = _GrepKeys( $array, m/\d+/ ); foreach($lol as $key <=> $value) { println("$key <=> $value"); } // A custom made reverse Grep for returning matching kesy instead of matching values Function _GrepKeys( $input, $pattern, $flags = 0 ) { my $keys = Grep( Keys($input), $pattern, $flags ); my $vals = array(); foreach ( $keys as $key ) $vals[$key] = $input[$key]; return $vals; }
