#!/usr/bin/perl -s print $xyz if $xyz;