$ver = $1, $date = $2, $coder = $3 if(m!\Arevision\s(\d+\.\d+)$ ^date:\s(\d{4}/\d{2}/\d{2})\s[\d|:]+;\s+author:\s+(\w+); [\w|\s|:|;|\d|\+|-]+\Z!mx);