Guys, I am new to perl. I have a problem here.
This is my 1st script called Twiddle.pm
Code:
package Twiddle;
sub swap {
my $username = "john";
}
1;
this is my second script
Code:
#!/usr/bin/perl
use strict;
use Twiddle;
print Twiddle::swap("my($username)");
print "\n";
when i execute, error comes. This is the error
Global symbol "$username" requires explicit package name at ./firstmodule.pl line 5.
Execution of ./firstmodule.pl aborted due to compilation errors.
how to solve this problem..