sub error {
        print $data; # oops, doesn't work!
    }