my $status = $? >> 8;

##</code><code>##

perl -le'print 256 >> 8'