Akim Demaille wrote:
> # Now do all the work on each file.
> foreach my $am_file (@input_files)
> {
> if (! -f ($am_file . '.am'))
> {
> &am_error ("\`" . $am_file . ".am' does not exist");
> }
> else
> {
> &generate_makefile ($output_files{$am_file}, $am_file);
> }
> }
>
> and there is a sub:
>
> # Print an error message and set exit status.
> sub am_error
> {
> warn "$me: ${am_file}.am: @_\n";
> $exit_status = 1;
> }
Only a global is going to be seen within a separate function...
Derek
--
Derek Price CVS Solutions Architect ( http://CVSHome.org )
mailto:[EMAIL PROTECTED] OpenAvenue ( http://OpenAvenue.com )
--
I will not hide behind the Fifth Amendment.
I will not hide behind the Fifth Amendment.
I will not hide behind the Fifth Amendment...
- Bart Simpson on chalkboard, _The Simpsons_
