Help for this page
>perl -E '$_="h:/p/f.zip";$replace=q[qq<x?f=$1>];s|([^/]+)$|$replace|e +e;say' h:/p/x?f=f.zip
>perl -E '$_="ABC";$replace="qx|head -5 /etc/passwd|";s/B/$replace/ee; +say' Aroot:x:0:0::/root:/bin/bash ... adm:x:3:4:adm:/var/log:/bin/false lp:x:4:7:lp:/var/spool/lpd:/bin/false C