Note: The OAuth docs actually say that you should do it this way:

    use Net::OAuth
    $Net::OAuth::PROTOCOL_VERSION = Net::OAuth::PROTOCOL_VERSION_1_0A;

Note the lack of semicolon on the first line. I can't speak as to whether this is a typo or this is intentional, but it's worth noting.