Hi Rajeev,
On Sun, 4 Sep 2011 08:05:52 -0700 (PDT)
Rajeev Prasad wrote:
> Shlomi Fish,
>
> this is not complete code but part of it, '...' in top and bottom denote
> that, strict warning etc is used.
Well, first of all, it would be a good idea to include the complete code. Using
"..." to denot
Hi Ron,
On Sun, 4 Sep 2011 15:28:17 -0700 (PDT)
Ron Weidner wrote:
> I have a class named Widget in a file named Widget.pm. I have another class
> named Table in a file called Table.pm. Table extends Widget.
>
> ---
>
> package Widget;
> #file Widget.pm
>
> #insert a bunch of methods...
>
I have a class named Widget in a file named Widget.pm. I have another class
named Table in a file called Table.pm. Table extends Widget.
---
package Widget;
#file Widget.pm
#insert a bunch of methods...
---
package Table;
#file Table.pm
use Widget;
@ISA=("Widget");
#insert several method
Shlomi Fish,
this is not complete code but part of it, '...' in top and bottom denote that,
strict warning etc is used. all variables etc are already created using 'my'. i
am using global variables. what should anybody name their variables, is upto
them.
you seem to be someone who get arrogant
Rajeev Prasad wrote:
$k=1;
my $arSZ = @tmpAR=split(/"/,$line);
for $x (0..$arSZ-1){
if ($x % 2 == 0) {
push(@modline,"$tmpAR[$x]");
} else {
my $count = $tmpAR[$x-1] =~ tr/,/,/;#try for something more
correct like... =~ m/\,/g);
$k = $k + $count;
pus
Hi Parag,
a few comments on your code.
On Sat, 3 Sep 2011 23:38:31 -0700
Parag Kalra wrote:
> use strict;
> use warnings;
> while(){
You should expect the contents of the file to be in a different place than
__DATA__, so one should use open or *ARGV or whatever here.
> my $num = $. - 1;
