if ( $INPUT_DATA =~ /module (\w+) /) { my $circuit_name = $1; print "circuit name = $circuit_name\n"; }