Hi
I have a file list like following
my @file_list=("a1.exe","a2.exe","a3.invalid_exe");
I want to store only the names that has extension as ".exe" and remove the
others.I am using
my $filename=".exe";
@file_list = grep /\$filename$/i, @file_list;
On 22/04/2002 06:49:52 perl-win32-users-admin wrote:
>Dear All,
>I have seen one perl code with the following stuff
>
>sub func_name($$$)
>{
>$a = @_;
>}
>
>My question is ,
>
>What is the purpose of $$$ in the function definition.
>
It tells Perl that func_name expects three scalars.
Check
> Q1) while(<>){
> $data=$data . $_;
> print $data;
> print "loop\n"
> }
>
> and calling it like this c:\>perl simple.pl data.txt
> it should print all the lines of data.txt once but it
> doesn't but it print all the lines 2-3 times before
> next ?
> $data=$data .
Why don;t you use Win32::GUI::MessageBox - i've had reasonably success with that...
ta
> -Original Message-
> From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]
> Sent: 24 April 2002 23:38
> To: [EMAIL PROTECTED]
> Subject: Tk's messagebox
>
>
> I have been trying to use Tk's Message Bo