# one way to do it. Changes "$i = 2" to "$i = 20".
perl -lpi.bak -e 'BEGIN { ($var, $val) = @ARGV; @ARGV = qw/parameter.ph/ } s/^(my \$$var =).*/$1 $val;/' i 20