string als code ausführen?

[norman]

hallo!

gibt es in perl eine möglichkeit einen string als programmcode  auszuführen (z.b. aus einer db?)? in php geht das mit:

eval ();

gruß
norman

z.B.:
$string = 'print_out("test"); sub print_out{ print $_; } )';

[Norbert Kölln]

Moin, moin!

Genau so funktioniert es in Perl.

Alles klar?

Norbert

[norman]

moin!

wie jetzt?
kannst du mir das mal zum mitmeißeln aufschreiben ;-)

norman

Moin, moin!

Genau so funktioniert es in Perl.

Alles klar?

Norbert

[Philipp Hasenfratz]

Halihallo norman

kannst du mir das mal zum mitmeißeln aufschreiben ;-)

perldoc -f eval

eval $string;
if ($@) {
   # error occured
}

Perl-Code von der DB ausführen... Blasphemie! - Löse das anders und
merke dir: eval ist _böse_. Das meiste lässt sich anders lösen.
Schreibe lieber, was du machen willst, sodass man dir eine bessere
Lösung vorschlagen kann.

Viele Grüsse

Philipp

[norman]

Perl-Code von der DB ausführen... Blasphemie! - Löse das anders

ich weiss, jetzt muss aber erstma ne schnelle lösung her, und damit gehts nun mal einfacher...

[Norbert Kölln]

Nochmals moin, moin!

Definiere einen String, z. B.
$befehl='print "Hallo Welt";';

Und führe den enthaltenen Befehl aus mit
eval($befehl);

Alles klar?

Norbert

[norman]

jo, danke! quick and dirty ;-)