Quote

Code: (dl )

if ($pipetest eq undef){

Das ist nicht besonders sinnvoll. Auf undef tested man mit if (!defined(...)) {, aber der Wert wird nie undef sein.

Stattdessen wuerde ich if ($pipetest eq '') { oder unless (length($pipetest)) nehmen.