BUFOBJ T_BUFOBJ
INPUT
T_BUFOBJ
$var = $arg;
if (SvRV ($arg) != cur_bufobj || !SvROK (msg))
switch_bufobj ($arg);
BUFOBJ T_BUFOBJ
INPUT
T_BUFOBJ
$var = $arg;
if (SvRV ($arg) != cur_bufobj || !SvROK (msg))
switch_bufobj ($arg);