xif source.perl Conditional One-line