bareword

Why does Perl complain about barewords in my Win32::OLE script?

#___ FIND LAST ROW/COLUMN WITH DATA my $row = $Sheet1 -> UsedRange -> Find( { What => "*", SearchDirection => xlPrevious, SearchOrder => xlByRows })-> {Row}; Error: Bareword "xlByRows" not allowed while "strict subs" in use. ...

Why does defined sdf return true in this Perl example?

I tried this example in Perl. Can someone explain why is it true? if (defined sdf) { print "true"; } It prints true. sdf could be any name. In addition, if there is sdf function defined and it returns 0, then it does not print anything. print (sdf); does not print sdf string but if (sdf eq "sdf") { print "true"; } prints ...

Getting a Bareword error on Perl Tutorial

I'm making progress but I've run into a new problem. This is the new code: #!/usr/bin/perl -w use strict; use LWP::Simple; use HTML::TreeBuilder; my $url = 'http://oreilly.com/store/complete.html'; my $page = get( $url ) or die $!; my $p = HTML::TreeBuilder->new_from_content( $page ); my($book); my($edition); my @links = $p->look_dow...