my $caseNumber = $ARGV[0];
my $pattern = "(.*?)$caseNumber(.*?)";