Core Function Regex Replace - Revision history

UberFoX at 20:16, 23 June 2015

2015-06-23T20:16:31Z

← Older revision		Revision as of 20:16, 23 June 2015
Line 1:		Line 1:
	<pre>		<pre>
	<Expression> =~ s/pattern/replacement/flags		<Expression> =~ s/pattern/replacement/flags
		+	s/pattern/replacement/flags
	</pre>		</pre>

UberFoX: /* Expression */

2015-06-23T20:16:22Z

Expression

← Older revision		Revision as of 20:16, 23 June 2015
Line 12:		Line 12:

	Any valid expression that can be used usually a string but it will accept an array and do the Regexp replacement on every item in the array (it is recursive and will do every array in the array and so on).		Any valid expression that can be used usually a string but it will accept an array and do the Regexp replacement on every item in the array (it is recursive and will do every array in the array and so on).
		+
		+	You may choose to skip this part and it will use $_ for you.

	==== pattern ====		==== pattern ====

UberFoX: /* Example */

2015-06-23T20:15:59Z

Example

← Older revision		Revision as of 20:15, 23 June 2015
Line 263:		Line 263:
	echo "OLD: $old\n"; //Prints: cat		echo "OLD: $old\n"; //Prints: cat
	echo "NEW: $new\n"; //Prints: dog		echo "NEW: $new\n"; //Prints: dog
		+	</syntaxhighlight>
		+
		+	If you ignore the $var =~ part and just do the regex part it will use the $_ variable example
		+
		+	<syntaxhighlight lang="sputnik">
		+	my $_ = "cat";
		+	s/cat/dog/;
		+	say $_; // Prints dog
	</syntaxhighlight>		</syntaxhighlight>

	[[Category:Core Function]]		[[Category:Core Function]]

UberFoX: 1 revision

2015-06-14T12:38:54Z

1 revision

← Older revision

Revision as of 12:38, 14 June 2015

UberFoX: 1 revision

2014-08-11T21:40:42Z

1 revision

← Older revision

Revision as of 21:40, 11 August 2014

UberFoX: /* flags */

2013-10-15T05:01:59Z

flags

← Older revision		Revision as of 05:01, 15 October 2013
Line 42:		Line 42:

	n = Do not capture unnamed groups. The only valid captures are explicitly named or numbered groups of the form (?<name> subexpression)		n = Do not capture unnamed groups. The only valid captures are explicitly named or numbered groups of the form (?<name> subexpression)
		+
		+	v = Do replacement on array keys instead of values (it will only use string keys not numeric keys).

	c = Ignore cultural differences in language.		c = Ignore cultural differences in language.

UberFoX: /* Example */

2013-10-15T04:57:38Z

Example

← Older revision		Revision as of 04:57, 15 October 2013
Line 82:		Line 82:
	# [1] => Dog		# [1] => Dog
	# [2] => Fox		# [2] => Fox
		+	# }
		+	</syntaxhighlight>
		+
		+	Replacement on an array keys
		+
		+	<syntaxhighlight lang="sputnik">
		+	# Make array
		+	$test = array("Cat111" => "Meow", "Dog222" => "Woof");
		+
		+	# Remove all numbers from array
		+	$test =~ s/\d+//gv;
		+
		+	# Print result
		+	printr($test);
		+	# Prints:
		+	# ARRAY
		+	# {
		+	# [Cat] => Meow
		+	# [Dog] => Woof
	# }		# }
	</syntaxhighlight>		</syntaxhighlight>

UberFoX: /* Example */

2013-10-03T18:17:56Z

Example

← Older revision		Revision as of 18:17, 3 October 2013
Line 170:		Line 170:

	Convert a string to hex and back again using switch "e" on a regex to decode the hex		Convert a string to hex and back again using switch "e" on a regex to decode the hex
		+
	<syntaxhighlight lang="sputnik">		<syntaxhighlight lang="sputnik">
−	$~~hex~~ = ~~Unpack("*H",~~ "Hello World!", 1);	+	$str = "Hello World!";
−	println("Hex String: " . $~~hex~~);	+	println("Orig String: " . $str);
−	$~~hex~~ =~ s/([\dA-Fa-f][\dA-Fa-f])/~~Chr~~(Dec($1))/ego;	+	$str =~ s/(.)/Hex(AscW($1), 2)/ego;
−	println("Normal String: " . $hex);	+	println("Hex String: " . $str);
		+	$str =~ s/([\dA-Fa-f][\dA-Fa-f])/ChrW(Dec($1))/ego;
		+	println("Normal String: " . $str);
		+	</syntaxhighlight>
		+
		+	Convert a string to hex and back again (another way to do it)
		+
		+	<syntaxhighlight lang="sputnik">
		+	Function StrToHex ( $Str )
		+	{
		+	$Str = unpack('H*', $Str, 3);
		+	# Operationally convert the hex characters
		+	# to upper case
		+	$Str =~ tr/a-z/A-Z/;
		+	return $Str;
		+	}
		+	Function HexToStr ( $Hex )
		+	{
		+	$Hex =~ s/([\dA-Fa-f][\dA-Fa-f])/pack("C", dec($1))/eg;
		+	return $Hex;
		+	}
		+	my $Hex = StrToHex("Hello world!");
		+	echo "Hex: $Hex\n";
		+	my $Str = HexToStr($Hex);
		+	echo "Str: $Str\n";
	</syntaxhighlight>		</syntaxhighlight>

Line 217:		Line 242:
	echo "OLD: $old\n"; //Prints: cat		echo "OLD: $old\n"; //Prints: cat
	echo "NEW: $new\n"; //Prints: dog		echo "NEW: $new\n"; //Prints: dog
−	~~</syntaxhighlight>~~
−
−	~~Convert a string to hex and back again~~
−
−	~~<syntaxhighlight lang="sputnik">~~
−	~~$str = "Hello World!";~~
−	~~println("Orig String: " . $str);~~
−	~~$str =~ s/(.)/Hex(AscW($1), 2)/ego;~~
−	~~println("Hex String: " . $str);~~
−	~~$str =~ s/([\dA-Fa-f][\dA-Fa-f])/ChrW(Dec($1))/ego;~~
−	~~println("Normal String: " . $str);~~
	</syntaxhighlight>		</syntaxhighlight>

	[[Category:Core Function]]		[[Category:Core Function]]

UberFoX: /* Example */

2013-09-28T15:55:58Z

Example

← Older revision		Revision as of 15:55, 28 September 2013
Line 64:		Line 64:

	=== Example ===		=== Example ===
		+
		+	Replacement on an array
		+
		+	<syntaxhighlight lang="sputnik">
		+	# Make array
		+	$test = array("Cat111", "Dog222", "Fox333");
		+
		+	# Remove all numbers from array
		+	$test =~ s/\d+//g;
		+
		+	# Print result
		+	printr($test);
		+	# Prints:
		+	# ARRAY
		+	# {
		+	# [0] => Cat
		+	# [1] => Dog
		+	# [2] => Fox
		+	# }
		+	</syntaxhighlight>

	A simple search replace		A simple search replace

UberFoX: /* Expression */

2013-09-28T15:55:01Z

Expression

← Older revision		Revision as of 15:55, 28 September 2013
Line 11:		Line 11:
	==== Expression ====		==== Expression ====

−	Any valid expression that is a string.	+	Any valid expression that can be used usually a string but it will accept an array and do the Regexp replacement on every item in the array (it is recursive and will do every array in the array and so on).

	==== pattern ====		==== pattern ====