[qiang@dev qiang]$ perl -MLWP::Simple -e '$x=mirror("http://cherryavenuefarms.org/","tt");print $x'
200

[qiang@dev qiang]$ perl -MLWP::Simple -e '$x=mirror("http://cherryavenuefarms.org/","tt");print $x'
304