print $o->{handle} $line;