>perl -wMstrict -le
"print M::get_x();
 ;;
 use M;
 ;;
 print M::get_x();
"
42
42