my $revision_number = '$Revision$' =~ /.Revision:\s+(\d+)/ ? $1 : '';