Help for this page
if (-f "data/$file.data" or -f "data/$otherfile.data) { ...
use FindBin; my $dataPath = "$FindBin::Bin/data"; if (-f "$dataPath/$file.data" or -f "$dataPath/$otherdata.data") { ...