neco jako include

[Milan Šorm]

# Tak se jdu vicemene zastrelit a pak si pripsat cerny bod, protoze jsme
# zkusil 'do' (snad nikdy predtim jsem nemel tu cest) a na rozdil od require
# tem soubor natahne vzdy. Ale muj problem to neresi, protoze zatim nevim,
# jak treba udelat include na  soubor, kter obsahuje neco jako 'use strict'
# - proste neco, co se dela v dobe prekladu. 'do' se podle vseho udela az
# pro behu. Takze: existuje neco jako include?
# 

No tak v tom pripade bych zkusil nacist soubor a provest eval $nactene;

primo include neexistuje

tedy: 

open INCLUDE,$file; $include = join '',<INCLUDE>; close INCLUDE; eval $include;

--milan