# # I use curl and sed instead of something cleaner like LWP # # deal with it # my $status_exec = `curl --silent http://twitter.com/$user | sed -n -e 's/.*Updates.*\\(.*\\)<\\/span>.*/\\1/p'`; $status_exec =~ tr/,//d; $statuses_count = int($status_exec) || die "Couldn't retrieve current statuses count:\n";