When it needs to create various choises according to someone variable it’s reasonable to build a shitch block: sub test { my $var = shift; SWITCH: for($var) { /^1$/ && do { do something for case 1 … ; last SWITCH;}; /^2$/ && do { do something for case 2 … ; last SWITCH;}; /^3$/ && do { do something for case 3 … ; […]
Embperl + CGI = problem with upload of files
Recently I’ve spent a half of working day to find what was happened with uploading of files in our web server. We use Embperl to build dynamic web pages and I’d like to say many thanks to Gerald Richter who is an author of Embperl. My mistake was I didn’t upgrade Embperl till latest version or at least I had to read change logs of […]