undef $/;
$_=<DATA>;