I have updated my original Facebook status script to version 2.1. Grab it from here.

The major change for this version is a switch to Facebook’s mobile pages for easier parsing. You can include this script into all sorts of wacky things.

Usage example:
perl facebook-status-2.1.pl

Facebook login name: some.user@example.com
Password: ******
Your status (Facebook appears to have a 232 character limit): I'm setting my status removely!!

Sending... Done!