Input:
1. getopt.pl --platform=1 --version=E48.1 ..... ok
2. getopt.pl --platform=1 --version=E48.2 ..... Failed
3. getopt.pl --platform=1 --version=48.2  ..... ok
4. getopt.pl --platform=1 (script find version value E48.2) ... failed

Sample code:
use Getopt::Long;

my $platform    = 0;
my $version     = undef;
my $suffix      = undef;

my $flag1       = 0;
my $flag2       = 0;

GetOptions ('platform=i'    => \$platform,
            'version=s'     => \$version,
            'suffix=s'      => \$suffix,
            'flag1'         => \$flag1,
            'flag2'         => \$flag2,);

if ($platform == 1)
{
    if (!defined($version))
    {
         Find version number!!
         $version = E . "$valuefind"; ($version will be E48.2)
    }

    print "Find version: " . $version . "!\n";

    if (!defined(Suffix) && defined($version))
    {
         Find suffix value, let's say suffix is F!!
    }

    print "Find suffix: " . $suffix . "!\n";
}

Output for each input is like:
1. Find version: E48.1!
   Find suffix: F!
   
2. Find version: E48.2!
   Use of uninitialized value $suffix in concatenation (.) or string at getopt.pl.
   
3. Find version: 48.2!
   Find suffix: F!
   
4. Find version: E48.2!
   Use of uninitialized value $suffix in concatenation (.) or string at getopt.pl.