my $txt="Version=2010-09-01_17-29-04 Build=26";

my ($build) = $txt =~ /(?:=)(\d+)$/;

print $build;