functions in Perl using equivalent push or pop functions with 8. Rewrite following proper argument. (& points) splice function Equivalent push or pop function lice(@array, $#arraytl, 0, Sp. Sq) splice@array,0, 0,Sp. Sq splicet@array, 0, 1) splice(@array, -1) 9. Suppose the variable svar has the value abc123. Indicate whether the following conditional expressions return true or false. (4 points) $var =~ /\w { 4-6)/ $var =~ / (id) 2 (\1) / svar/abcs/ var/1234? 10. Suppose the variable svar has the value abc123abc. What is the value of svar after the following substitutions? 4points) svars/la-z]+/X/g $vars/B/W/i vars/abc/def/