Ok .. I have been requested to provide more info ... here is the first part of my program ...

#!/home/freetool/bin/perl5

open(CLI,"datablitz_dump") or die "datablitz_dump not found\n";

$iline = 0;

while(<CLI>)
  {
  if (/^Dn:/)
    {
    $iline++;
    #   ($dn1)= $_ =~ /^Dn: \w+ (\w+ = \d+)/;
    $trav=$_;
    $nbwd = ($trav =~ s/(\w+\s+=\s+\d+)//g);
    $trav=$_;
    $trav=~ s/Dn: //;
    $walknbwd[$iline][0] = $nbwd;
    for ($i=1;$i<=$nbwd;$i++)
      {
#      ($bid,$dns[$i-1]) = ($trav =~ /(\w+\s+(\w+\s+=\s+\d+),*\s*){$i}
+/);
      ($bid1,$bid2,$walkdns[$iline][$i-1],$walkdnval[$iline][$i-1]) = 
+($trav =~ /(\w+\s+((\w+)\s+=\s+(\d+)),*\s*){$i}/);
      }
[download]

I get the following syntax error during compliation

perlprog[3]: syntax error at line 3: '(' unexpected
[download]

If I replace line 3 with open CLI, "database_dump"; I get the following errors during compliation

perlprog[3]: open: not found
perlprog[5]: =: not found
perlprog[7]: syntax error at line 7: ')' unexpected
[download]

I know this works in theory but I can't seem to run it on my machine ... my machine is the problem I think but I don't know why ...

Ta

Rich

---

---

• Are you posting in the right place? Check out Where do I post X? to know for sure.
• Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:

  <code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>

• Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
• Want more info? How to link or How to display code and escape characters are good places to start.