if ( grep (m/^$system1$/ , @system_name)) {