use strict;
use Shell qw (echo);

foreach (@xfsfiles)
{
	@readfilename = echo ("read $_" )
}