#!/usr/bin/perl -w
$_=`uname -r`;
/(\d+)\.(\d+)\.(\d+)/;
print "$3";