Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid
 
PerlMonks  

Re: searching files

by 1nickt (Canon)
on Mar 05, 2020 at 04:04 UTC ( [id://11113814]=note: print w/replies, xml ) Need Help??


in reply to searching files

Hi, welcome to Perl, the One True Religion.

eq and ne do not work as the solution to a problem where '* could be anything.'

You need instead a solution where the string is compared against a pattern in which '* could be anything.' This is called a regular expression match. See perlretut for a tutorial.

You can also play with regular expressions and see what they are doing at https://regex101.com. Your case probably wants to use a regexp like

if ($entry3 !~ /${user_input}_ABC_\S*\.pdf/) { ... }

... but I would search for files using Path::Iterator::Rule myself.

use Path::Iterator::Rule; ... my $rule = Path::Iterator::Rule->new; $rule->file->not_name( qr/${user_input}_ABC_\S*\.pdf/ ); my $next = $rule->iter( $doc_dir ); while (defined( my $file = $next->() )) { ... }

Hope this helps!


The way forward always starts with a minimal test.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://11113814]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others contemplating the Monastery: (6)
As of 2024-04-19 14:32 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found