perl - Why do I get a number instead a list of filenames from readdir? -

-

i have piece of perl code searchnig directory , display contents of directory, if match found. code given below:

$test_case_directory = "/home/sait11/desktop/salt/data_base/test_case"; $xml_file_name = "sample.xml"  $file_search_return = file_search($xml_file_name); print "file search return::$file_search_return\n";   sub file_search {     opendir (dir, $test_case_directory) or die "\n\tfailed open directory contains test case xml files\n\n";      print "xml_file_name in sub routines:: $xml_file_name\n";      $dirs_found = grep { /^$xml_file_name/i } readdir dir;     print "files in directory dirs_found :: $dirs_found\n";     closedir (dir);     return $dirs_found; }

output is,

xml_file_name in sub routines:: sample.xml files in directory dirs_found :: 1 file search return::1

it not returning file name found. instead returns number 1 always.

i don't know why not returning file name called sample.xml present in directory.

($dirs_found) = grep { /^$xml_file_name/i } readdir dir; #capture

problem that, evaluating grep scalar context, change list context give desired result.

in scalar context, grep returns number of times expression true.

in list context, returns elements expression true.


Comments

Post a Comment

Popular posts from this blog

ASP.NET/SQL find the element ID and update database -

-
basically i've got update query runs when click submit button. i have asp:repeater in page layer inside this <asp:repeater id="dgbookings" runat="server" onitemdatabound="itemdb"> <itemtemplate> <div class="bookingscontent"> <div class="bookingdetails" id="<%# databinder.eval(container.dataitem, "booking_ref") %>"> <p class="infotext"><%# databinder.eval(container.dataitem, "adults") %> <asp:linkbutton onclick="editdetails" text="edit..." runat="server"></asp:linkbutton></p> <p class="infotext"><asp:linkbutton onclick="submitdetails" text="submit..." runat="server"></asp:linkbutton></p> </div> </div> </itemtemplate> <asp:repeater> and outputs ...
Read more

jquery - appear modal windows bottom -

-
i have modal windows in application, work fine <div id="modal" class="modal hide fade" tabindex="-1" role="dialog" aria-labelledby="mymodallabel" aria-hidden="true"> but when modal appears, appear top of windows, , want appear bottom the application joomla 3.0! , using template of meet gavern any idea? i found solution i modified de css in bootstrap .modal.fade { top:-25%; -webkit-transition:opacity .3s linear, bottom .3s ease-out; -moz-transition:opacity .3s linear, bottom .3s ease-out; -ms-transition:opacity .3s linear, bottom .3s ease-out; -o-transition:opacity .3s linear, bottom .3s ease-out; transition:opacity .3s linear, bottom .3s ease-out; }
Read more

c++ - Compiling static TagLib 1.6.3 libraries for Windows -

-
i having super hard time compiling , using taglib 1.6.3 in qt project. i've tried can think of. taglib claims supported through cmake i'm not having luck. furthermore, i'm confused kinds of files need qt libs! i've built *.a files, *.lib, , *.dll. understand far... believe since i'm working in windows *.lib want. no matter do, end "undefined references" taglib functions try use when try compile qt project. have tried mingw32, msys, visual studio 2008, , cross-compiling windows on linux. turning nothing. what makes less sense me if compile same taglib source qt on mac (g++ think?) works fine! somewhere in windows compilation procedures have going wrong. have been smacking face on desk 30 (on , off) hours trying figure out. since qt uses mingw must compile taglib same compiler? if compile *.lib's visual studio not compatible? are *.a libraries usable in windows? (assuming mingw) i'm still trying handle on c++ stuff, after reading coun...
Read more