$originalcmdline = some magic code here ...;
open( P, "| prog1 | prog2 | $originalcmdline" );