>perl -e"use Scalar::Util qw( weaken );"

>

##</code><code>##

>perl -e"use Scalar::Util qw( weaken );"

>