eval Problem (Allgemeines zu Perl) - Perl-Community.de

Start · Board · Anwendungen/Programme/Skripte in Perl · Allgemeines zu Perl

2024-04-25 21:40:04
Europe/Berlin
Einloggen (Registrieren)
- Einstellungen
- Statistics
Jemand zu Hause?
0 Benutzer online

[thread]14669[/thread]

submit to reddit

eval Problem

Leser: 23

Articles: hide open all | hide show old branches

+2 replies
Gast ferdinand

2010-02-15 11:10

Hallo zusammen,

ich habe in einer Konfigurationsdatei die Variable $result = "results_{$date}.log" deklariert. Im Hauptprogramm wird $date gesetzt. Wie bekomme ich den String dann interpoliert, dass für $date der Wert aus $date eingesetzt wird?

Habe bisher erfolglos mit eval rumexperimentiert...

my $bla = eval { $result } z.B...

Vielen Dank
- Taulmarill
  
  2010-02-15 11:29
  User since
  2004-02-19
  1750 Artikel
  BenutzerIn
  Wenn du es unbedingt mit eval machen willst, dann z.B. so:
  
  Code (perl): (dl )
  
  my $bla = eval "qq{$result}";
  
  Ich würde für so was aber lieber einen Regulären Ausdruck verwenden, da String-evals potenziell gefährlich sind. In $result könnte sich ja ausführbarer Perlcode verstecken, der unerwünschte Auswirkungen hat.
  
  Code (perl): (dl )
  
  1 2
  
  my $bla = $result; $bla =~ s/\$date/$date/;
  
  $_=unpack"B*",~pack"H*",$_ and y&1|0& |#&&print"$_\n"for@.=qw BFA2F7C39139F45F78 0A28104594444504400 0A2F107D54447DE7800 0A2110453444450500 73CF1045138445F4800 0 F3EF2044E3D17DE 8A08A0451412411 F3CF207DF41C79E 820A20451412414 83E93C4513D17D2B

View all threads created 2010-02-15 11:10.