It works for me:
The following code:
my $file ="test.html";
my @title = split (/\./, $file);
print "file=$file\n";
print "title1=$title[1]\n";
Outputs:
file=test.html
title1=html
I'm trying to disable a button using Perl's Tk module. Setting the state to 'disabled' doesn't really disable the button, it just delays the action until after the button is re-enabled. I want to ignore all mouse clicks that occur when the button is disabled. Here's some code to show the...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.