sub Monitoring_Export_Allgemeines { # system( "CLS" ); print "-------------------------------------------------------------------------" , "\n"; my $Monitoring_Exporte_Parameter_GUI_I = ""; my ( $Monitoring_Inhalte_POST ) = &Monitoring_Server_POST( $Monitoring_Exporte_Parameter_GUI_I ); if( $Monitoring_Inhalte_POST =~ /Oberflaeche_I/ ) { print "\n"; print "Monitoring - PERL Verarbeitung - Oberflaeche I" , "\n"; print "----------------------------------------------" , "\n"; print "\n"; ... Weitere Verarbeitung - Hier ohne Relevanz } }