Something like this should do it (untested).
If the pattern '* disks' can span multiple lines then the solution is more complex. But that looks like a typical set of tokens that would be found on a single line.

#!/usr/bin/perl -w
use strict;

my $file="show_configuration.out";
open (IN, '<', $file) or die "Can't open $file: $!\n";

my $patternSeen =0;

while (<IN>)
{
   $patternSeen =1 if /\*\sdisks/; #  '* disks' has been seen
   
   next unless $patternSeen;
   
   print;
}
[download]