Not being able to search

Hi there, i want to implement a a system to search for a file in a folder using the file name and if its there, i want it to be displayed. I have one through a couple of books on how to implement this but still, it does not open the file.

Expand|Select|Wrap|Line Numbers

 #!C:/Perl/bin/perl
 
use strict;

use CGI qw(:standard);

use CGI::Carp qw(warningsToBrowser fatalsToBrowser);

use DBI;

use CGI;
 
print header();
 
my $ps = param('ps');

my $name = param('name');
 
if ($ps eq "search") {

    if ($name eq "") {

        print "<p> No search keyword";

    } else {

        open(FILE, "<C:/docs/media/$name") or print "<p> File '$name' does not exist";
 
        while(<FILE>) {

            print;

        }
 
        close FILE;

    }

}
 
print <<END1;

<HTML>
 
<HEAD>

<TITLE>SEARCH/UPLOAD</TITLE>

</HEAD>
 
<style type="text/css">

.box1 {

    margin-left: 0px;

}

</style>
 
<BODY bgcolor = "#003366">

<form action="" method="post" enctype="multipart/form-data" name="uploadform">

<img src="unilogo.gif" border=0> </img>

<br/>

<br/>

<br/>

<table border="0" cellpadding="2" cellspacing="5">
 
<font color="yellow"><h1>Media File Upload/Search System</h1></font>
 
    <tr>

     <td>

     <strong><font color="white" size="5px">Search for Media Files</font></strong>

     </td>

     </tr>

     <tr>

     </tr>

     <tr>

     <td>

     <table class=box1><tr><td><input name="name" SIZE=50></td>

     <td>

     <input name="ps" type="hidden" value="search">

     <input name="search" type="submit" value="Search" size="30">

     </td>

     </tr>

     </table>

     </tr>

     </td>

    </tr>
 
</table>

<table>

<tr>

<td ALIGN="left">

<a href="uploadpic.pl"><FONT color=c0c0c0 ><strong>Upload Pictures</font></a>

</td>

</tr>

</table>
 
<table>

<tr>

<td ALIGN="left">

<a href="uploadso.pl"><FONT color=c0c0c0 ><strong>Upload Music</font></a>

</td>

</tr>

</table>
 
<table>

<tr>

<td ALIGN="left">

<a href="uploadvid.pl"><FONT color=c0c0c0 ><strong>Upload Videos</font></a>

</td>

</tr>

</table>
 
<table>

<tr>

<td ALIGN="left">

<a href="login.pl"><FONT color=c0c0c0 ><strong>Sign-out</font></a>

</td>

</tr>

</table>
 
</form>

</body>

</html>
 
END1
 
sub dienice {

    my ($msg) = @_;

    print "<h2>Error</h2>\n";

    print $msg;

    exit;

}
 
sub dbdie {

    my ($package, $filename, $line) = caller;

    my $errmsg = "Database error: $DBI::errstr<br> called from $package $filename line $line";

    &dienice($errmsg);

}

Above is how far i've gone, please can anyone help me on this.

Stunna

May 1 '07 #1

Subscribe Post Reply

1840

KevinADC

4,059

Expert 2GB

What does happen when you run your script?

May 1 '07 #2

stunna

When i run the script, it does not open the file specified nor attempt to open a file, it just displays the error message that the file does not exist even though i put in a fcorrect file name that exists. It simply does not attempt to search for the file. Actually, am trying to implement a system that searches a folder for a file and displays it. Thanks for your interest

May 2 '07 #3

KevinADC

4,059

Expert 2GB

change this line:

Expand|Select|Wrap|Line Numbers

 open(FILE, "<C:/docs/media/$name") or print "<p> File '$name' does not exist";
 

to:

Expand|Select|Wrap|Line Numbers

 open(FILE, "<C:/docs/media/$name") or die "Can't open 'C:/docs/media/$name' : $!";
 
 

and see what gets printed. If you are entering a valid filename and perl can't open it and the path and filename is correct, I don't know what the problem is.

May 2 '07 #4

stunna

Thanks very much for your help so far. I think the problem is when i uploaded the file, it stored the file path and not the file name. Do you know how to strip of the file path or directory tree from the file name so that only the filename is stored. And usually when searching for a file, one might not know the filepath.

May 3 '07 #5

miller

1,089

Expert 1GB

Hi stunna,

Yes, use the File::Basename core library.

Expand|Select|Wrap|Line Numbers

 
use File::Basename qw(basename);
 
my $filename = "whatever your full path plus filename is";
 
my $basename = basename($filename);

- Miller

May 3 '07 #6

stunna

i used what you suggested but i get an error message "fileparse(): need a valid pathname"

May 3 '07 #7

stunna

Sorry, just sorted it out. Thanks guys for your help, i reallly appreciate

May 3 '07 #8

miller

1,089

Expert 1GB

Sorry, just sorted it out. Thanks guys for your help, i reallly appreciate

Your welcome. Glad you were able to figure it out.

- Miller

May 3 '07 #9

by: Jeff_Relf | last post by:

Hi Tom, You showed: << private const string PHONE_LIST = "495.1000__424.1111___(206)564-5555_1.800.325.3333"; static void Main( string args ) { foreach (string phoneNumber in Regex.Split...

.NET Framework

Will we be able to apply FP8 directly ?

by: Jean-Marc Blaise | last post by:

Dear all, Will we be able to apply FP8 (that comes out end of January) directly without obligation to go thru FP7a or will we have to step thru FP7a ? I wish to know the answer for both 8.1...

DB2 Database

Search algorithm to use

by: joshc | last post by:

If I have an array of data that I know to be sorted in increasing order, and the array is less than 50 elements, and I want to find the first element greater than a certain value, is a simple...

C / C++

Is anyone else able to see my search results?

by: lawrence k | last post by:

Here is the thing. When you go to this page: http://www.accumulist.com/index.php?search%5BallFields%5D=api I've put in some HR tags in the HTML to separate the 3 different queries. After those...

PHP

which c++ book i am not able to get Accelerated C++

by: arnuld | last post by:

hai folks, well, it's me again and again, i am asking questions. anyway, with your help i have finalised that i will start learning c++ (as you told me that i do not need to know any OO language...

C / C++

Any (preferrably Java) API for screen scraping sites able to login and batch user actions?

by: onetitfemme | last post by:

Say, people would like to log into their hotmail, yahoo and gmail accounts and "keep an eye" on some text/part of a site .. I think something like that should be out there, since not all sites...

HTML / CSS

Not able to access informatoin using Search Command I created

by: TheDataGuy | last post by:

Using MS ACCESS 2002 Problem - I developed a form, and within that FORM, I added a SEARCH BUTTON, and then I created a SUB-FORM, so when an end user clicks on the FORM it will POP-UP the SUB-FORM,...

Microsoft Access / VBA

The database manager is not able to accept new requests, has terminated all requests

by: narayan2586 | last post by:

Hi all, When ever i am trying to connect my application it's giving below error message: RemoteException occurred in server thread; nested exception is: java.rmi.RemoteException: ; nested...

DB2 Database

In search Function i cant able to search the Word with special character

by: Ragavendran | last post by:

Hi, I am using this method for search: Query =org.apache.lucene.queryParser.QueryParser.parse(String arg0) throws ParseException Hits = org.apache.lucene.search.Searcher.search(Query query,...

Java

How to turn on java script in a villaon keypad mobile phone

by: Charles Arthur | last post by:

How do i turn on java script on a villaon, callus and itel keypad mobile phone

Java

Batch import of multiple excel files into the database

by: ryjfgjl | last post by:

If we have dozens or hundreds of excel to import into the database, if we use the excel import function provided by database editors such as navicat, it will be extremely tedious and time-consuming...

Data Management

Migrating Website to Cloud - Emmanuel Katto

by: emmanuelkatto | last post by:

Hi All, I am Emmanuel katto from Uganda. I want to ask what challenges you've faced while migrating a website to cloud. Please let me know. Thanks! Emmanuel

General

Navigating the Data Structures and Algorithms (DSA)

by: BarryA | last post by:

What are the essential steps and strategies outlined in the Data Structures and Algorithms (DSA) roadmap for aspiring data scientists? How can individuals effectively utilize this roadmap to progress...

Algorithms / Advanced Math

Is that possible of reading the .csv file in column wise and the column have different lengths ?

by: Sonnysonu | last post by:

This is the data of csv file 1 2 3 1 2 3 1 2 3 1 2 3 2 3 2 3 3 the lengths should be different i have to store the data by column-wise with in the specific length. suppose the i have to...

C / C++

How to build RAID in BIOS?

by: Hystou | last post by:

There are some requirements for setting up RAID: 1. The motherboard and BIOS support RAID configuration. 2. The motherboard has 2 or more available SATA protocol SSD/HDD slots (including MSATA, M.2...

Computer Hardware

What is ONU?

by: marktang | last post by:

ONU (Optical Network Unit) is one of the key components for providing high-speed Internet services. Its primary function is to act as an endpoint device located at the user's premises. However,...

General

Problem With Comparison Operator <=> in G++

by: Oralloy | last post by:

Hello folks, I am unable to find appropriate documentation on the type promotion of bit-fields when using the generalised comparison operator "<=>". The problem is that using the GNU compilers,...

C / C++

Maximizing Business Potential: The Nexus of Website Design and Digital Marketing

by: jinu1996 | last post by:

In today's digital age, having a compelling online presence is paramount for businesses aiming to thrive in a competitive landscape. At the heart of this digital strategy lies an intricately woven...

Online Marketing

Not being able to search

Similar topics