$a = 'https://www.domain.com/aaa/bbb/file.zip'; $from = 'aaa.*\/(.+)$'; $to = 'file_publish?file=$1'; $a =~s/$from/$to/i; print "\$1: $1\n"; print "RESUTL: $a\n";