Changeset 20613
- Timestamp:
- 2009-09-16T15:06:14+12:00 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gsdl/trunk/perllib/plugin.pm
r20578 r20613 175 175 $options .= "$globals"; 176 176 } 177 # need to escape backslash before putting in to the eval 178 $options =~ s/\\/\\\\/g; 177 179 $options =~ s/\$/\\\$/g; 178 179 180 eval ("\$plugobj = new \$pluginname([],[$options])"); 180 181 die "$@" if $@;
Note:
See TracChangeset
for help on using the changeset viewer.