Some low-level style issues:

• Although parentheses around parameter lists are optional, there is consensus that they should not be omitted.
• I don't see any consist pattern in your use the $ sigil for variables. I suggest not using them at all.
• You use both Mechanize and raw Net::HTTP requests. I suggest using Mechanize for everything.

Some low-level style issues:

• Although parentheses around parameter lists are optional, there is consensus that they should not be omitted.
• I don't see any consist pattern in your use the $ sigil for variables. I suggest not using them at all.
• You use both Mechanize and raw Net::HTTP requests. I suggest using Mechanize for everything.