Thread: regex

If regex tools can't do it, do it yourself.

The best solution is to use a language that doesn't make you jump through hoops to accomplish this kind of thing.

Code:

#!/usr/bin/perl -w

sub func ($);

%repl = ('$variable' => 'urmfga');
$string = 'this is some text $variable some more text $random[1,6]';

$string =~ s/(\$\S+)/func($1)/ge;

print $string;

sub func ($)
{
	if ($_[0] =~ /\$random\[(\d+),(\d+)\]/)
	{
		int(rand($2 - $1) + $1);
	}
	elsif (exists $repl{$_[0]})
	{
		$repl{$_[0]};
	}
	else
	{
		warn "Failure <$_[0]>\n";
		$_[0];
	}
}

zx-1, this is C++ forum. Not a place for scripting languages.

Originally Posted by maxorator

zx-1, this is C++ forum. Not a place for scripting languages.

If you had sat down and contemplated my post, you might have come to the realization that the point I was trying to make was that C/C++ is not the panacea some people think it is. I.e. provided the OP isn't forced to use C++ his problem can be solved with a lot less effort in a language more attuned to it, like Perl, Python, or Ruby.

(Edited language to be somewhat less confrontational)

I guess he wants to use that in his program. Since this is a C++ forum, the rest of the program is in C++.

It is not hard to integrate Perl with C/C++. Maxorator, get your hackles down bro, zx-1 was just showing that C++ may not be the best tool for the job on this one.

Integrate... You mean, install Perl to every computer that the computer runs on?

Maybe start with a simple loop which finds '$' in a string, then extracts the word which follows.
Based on the value of the word, do various things to get a replacement text and then substitute.