#!perl use strict; use warnings; #use Chart::Points; use Chart::Lines; use Chart::Bars; #use Chart::StackedBars; use Chart::Composite; my $im = new Chart::Composite 600, 400; $im->set ( # Hier dürfen keine " benutzt werden, wegen Backslash n   # oder es müssen 2 Backslash benutzt werden.   title => 'Rechnertemperatur und Datenbankbelastung(Backslash)(n)'           .'in Abhängigkeit von der Tageszeit',   #sub_title => 'kleinerer Text darunter, nur einzeilig',   legend_labels => ['Temperatur', 'SQL-Abfragen'],   x_label => 'Zeit',   #x_ticks => 'vertical',   min_val => 0,   precision => 0,   # das war das Problem ); $im->set ( composite_info =>   [ [ 'Lines', [1] ],     [ 'Bars', [2] ],   ] ); $im->add_pt(split) while ; close DATA; $im->png(*STDOUT); _ _ E N D _ _ 0 32.2 23.6 1 32.3 28.1 2 32.7 31.7 3 32.0 32.2 4 31.7 27.8 5 32.2 35.1 6 32.5 29.0 7 33.0 24.5 8 32.6 27.7 9 32.2 18.1 10 30.7 10.2 11 29.2 9.1 12 30.4 6.4 13 32.2 10.3 14 32.8 6.9 15 32.5 8.1 16 32.9 10.1 17 32.6 10.0 18 32.7 12.8 19 32.7 14.1 20 32.7 17.0 21 32.5 21.4 22 32.5 23.7 23 32.5 23.3