Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl -l

...
    print "The string is $$ref"; 
}

Select or download this

this works
Error:17:  Can't use string ("str1") as a SCALAR ref while "strict ref
+s" in use