in reply to Including files (again)

my $include  = shift @ARGV;

do $include;
...

[download]
Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
"Science is about questioning the status quo. Questioning authority".
In the absence of evidence, opinion is indistinguishable from prejudice.
"Too many [] have been sedated by an oppressive environment of political correctness and risk aversion."

Replies are listed 'Best First'.
Re^2: Including files (again)
by JavaFan (Canon) on Jan 27, 2009 at 11:11 UTC
    You probably want to check the return value of 'do'. Unlike require (which could be used here instead of 'do' as well), 'do' won't die if there's a compilation error in $include - it will even continue if it cannot find or read $include.
[reply]

In Section Seekers of Perl Wisdom