Hi i`m new in perl world
I use Glade(Gtk2) to design GUI and glede2perl to translate c code to
perl code, but i can`t from TextFIeld "imeTF" get value and put to $ime.
Does somebody have some tutorial for this?
Sory english is not my strong side
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
I try to write login for my program
sub provera_korisnika
{
$dbh = DBI->connect("DBI:mysql:evidencija", 'root', '', { RaiseError
=>1, AutoCommit =>0 }) || die "Database connection not made: $DBI::errstr";;
my $sql = qq{ SELECT user, pass, grupa, br FROM login };
my $sth = $dbh->prep
i write this ...stil nothing
while( $sth->fetch() ) #petljom izvlaci red po red iz tabele
{
foreach($user)
{
if($user eq $ime)
{
print "$user, $ime\n";
}
else {print "pera\n";}
}
# print "$ime\n";
# #
I use something like this
sub provera_korisnika #Proveravam korisnicko ime i lozinku
{
$ime = $user->get_text; #this method get text from entry
$lozinka = $pass->get_text; #this to
$dbh = DBI->connect(
"DBI:mysql:evidencija",
Nenad wrote:
I use something like this
sub provera_korisnika #Proveravam korisnicko ime i lozinku
{ $ime = $user->get_text; #this method get text from entry
$lozinka = $pass->get_text; #this to
$dbh = DBI->connect(
"DBI:my