1$| = 1;
2$indent = 2;
3print " ";
4while (<>) {
5  chomp;
6  if (m|^Working in directory /tmp/hol98/src/(.*)$|) {
7    $toprint = $1;
8    if (length($toprint) + $indent + 1 > 75) {
9      print "\n  $toprint";
10      $indent = 2 + length($toprint);
11    } else {
12      print " $toprint";
13      $indent += (length($toprint) + 1);
14    }
15  }
16}
17print "\n";
18