Use input filename for file source

Currently, I don't know if `Source::File` is usable, because it takes `$!name` from the outer parser object.