Do proper perl

We can have several lines in the same plot.
Everything sould mostly work.