Lothar: copy mymem replacing "a01" by "b07"

Beitrag lesen

SELF-Forum

copy mymem replacing "a01" by "b07"

Lothar
– Informationen zu den Bewertungsregeln

Könntest du mir als jemandem, der Cobol nur vom Namen her kennt, bitte erklären, was genau du machen willst?

Ich habe im Perl-Programm, das HTML-Seiten generiert.

  
# .....  
print <<AAA;  
   <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" .....  
   <html>  
   <head>  
   <link rel="stylesheet" type="text/css" href="..../s.css">  
   <script type="text/javascript" src=".....JSlib/jspr.js"></script>  
   </head>  
   <body>  
AAA  
  
getinc ("dir");  
  
print <<BBB  
....  
BBB  
  
getinc ("impressum");  
.....  
  
print <<CCC  
.....  
</body>  
</html>  
CCC

Dazu liest es mit einem Unterprogramm getinc Bausteine, die in verschiedenen HTML-Seiten gleich sind

  
       $url="....." . shift . "inc";  
       $ua = LWP::UserAgent->new();  
       $req = HTTP::Request->new("GET" => $url);  
       $res = $ua->request($req);  
       # Fehlerabfrage  
       $seite = $res->content();  
       print $seite;

Das Ganze funktioniert einwandfrei.
Wenn ich aber in einem der inc-Dateien einen Wert habe, der abhängig sein soll von dem Programm, in das es kopiert werden soll, funktioniert das nicht mehr.
In anderen Worten:
Eine globale Variable im Hauptprogramm wird in dem kopierten Teil nicht erkannt.

Beitrag melden
–
Informationen zu den Bewertungsregeln