Help for this page
#!/usr/bin/perl -l ... my $file = '/path/to/deepstructure.php'; print $file;
<?php ... $x = 42; ?>