open($fh, '>', \$variable) || ..