Judging from this and your other post, I think someone should point out that we are not here to write your programs for you, but rather to provide help on concrete problems. Some effort on your part should be put into a question, at the very least a description of what exactly you're trying to achieve. Read How (Not) To Ask A Question for more on this topic.

Just for laughs, here's a one-liner that will monitor the status of a website (for a certain definition of "monitor"). Read the perldocs for the modules invovled and you'll be well on your way to writing your own, more production-suitable, version.

perl -MLWP -e 'print LWP::UserAgent->new->request(HTTP::Request->new(G
+ET=>"http://example.com"))->is_success()?"up\n":"down\n"'
[download]