#!/usr/bin/perl

use strict;

while(<>) {
    my $line=$_;
    my $arguments='';
    if (/\<\!\-\- POSTEVAL2 (.*?) \-\-\>/) {
	$arguments=$1;
    }
    if ($arguments=~/^verify\.pl fileglob/) {
	print "perl $arguments\n";
    }
}
