Recently I’ve playd aroung with wc which is not a water closet actually :). This is a Linux utility which can count bytes, words and newlines for some file. And additionally it counts a total lines for more than one file is specified. So, I’ve decided to count lines for Billing System (I work with that project three years!). Billing System is pure Perl application […]
Star Wars Mania
Personally, I don’t like new parts of Star Wars. Last Suturday I and Maria wen to Rio cinema and watched last part. It was boring exept final. But many people like Star Wars and have a fun !
Have a fun with nucleus comments
Today mornig when I came to the office I decided to clean spam comments from my blog. I already wrote a simple script which deletes comments by specific user name like ‘poker’, ‘online poker’ etc. But I made small changes in SQL query and made an error. As result I recovered all blog comments during two hours. It was good idea to print all messages […]
The glance on PHP through Perl
One month ago I started to customize SugarCRM for our company. This is a very good, hight quality software. But it ‘s based on PHP but I’ve developed on Perl during last four years. I’m not going to say “PHP is shit, Perl forever!”. I’d like just to share my impression of PHP as Perl developer. And sometimes I’m a little bit confused about PHP. […]
New Limassol theaters schedule
Updated Limassol cinema schedule from 27th May to 2 June. There are two new movies: thriller “Hostage” with Bruce Willis and Greek social drama “Mi Fevgis” in the Limassol theatres. You can still enjoy last part of “Start Wars” – “Star Wars: Episode III – Revenge of the Sith”, fabulous historical action “Kingdom of Heaven” and political thriller “The Interpreter”. Enjoy!
How to use constants in regexp.
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 […]
New Limassol theaters schedule
I’ve updated Limassol cinema schedule. There are two new movies: a historical drama “Kingdom of Heaven” with Orlando Bloom in the key role and a horror “Saw”. Personally, I and Maria are going to go Rio cinema to watch “Kingdom of Heaven”. Hope it’ll be interesting movie!