(Perl) Guard for PHP