Select Code to Download

$_srp_price = "$4.95";
print $_srp_price;

$ perl -le '$_ = "$4.95"; print'
.95

$ perl -wle '$_ = "$4.95"; print'
Use of uninitialized value in concatenation (.) or string at -e line 1
+.
.95

$ perl -wle '$_ = q($4.95); print'
$4.95

$ perl -wle '$_ = "\$4.95"; print'
$4.95