Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations bkrike on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Recent content by millimeter

  1. millimeter

    Getting JPEG Dimensions w/o ImageMagic?

    Howdy, Does anyone one have a Perl script that will get JPEG image dimensions (width/height) without ImageMagic? I basically want to glob through an image dir and return or print the dimensions. I can do the basic globing, opening, or reading...etc. But I have spent many hours working with a...
  2. millimeter

    Problem incorporating JavaScript in Perl

    Howdy... bpinos is correct in general… Because it is at line 0 it looks like your losing the bracket right after alert… escape all your brackets. You are likely loosing more than that, but because the actual Perl parsed code is not shown, I can’t tell. Parsing JavaScript with Perl can get...
  3. millimeter

    Saving Problem

    Howdy... This is a common problem. This may seem obvious but... If you sometime recenlty Defined a Site, even testing, Dreamweaver will assume that you are working relitive to the "Site" the next time you open it and place this path. Normally it will promt you, saying "...the...
  4. millimeter

    How Do I remove a specific chracter from the end of a string?

    Greetings, I am replacing spaces in a string with underscores: $userInput = "newname " (notice space) $userInput =~ s/( )/\_/g; However if the user leaves space(s) at the end of the string it then is output as; "newname_" This posses issues as you likely can imagine...
  5. millimeter

    Time Controlled Execution in Virtual Domain (& sub dirs)

    Greetings, I am a ammeter Perl programmer looking for a method to run a script or some operation (shell.. etc) based on time. I looked into cron but this as I understand is one per server, not virtual domain. For example I need to execute a script that reads a text file once every hour based...
  6. millimeter

    Timed Scripts in Virtual Domains

    Greetings, I am an ammeter Perl programmer looking for a method to run a script or some operation (shell.. etc) based on time. I looked into cron but this as I understand is one per server, not virtual domain. For example I need to execute a script that reads a text file once every hour based...
  7. millimeter

    Creating an list/array with glob & then test

    Thanks tl66 but That method exits on finding the case... I need to check the list/array for several items at different times without globing every time. Or print the list such as; foreach $list(@dirlist) { prnt "$list"; } Thanks.
  8. millimeter

    Creating an list/array with glob & then test

    I am trying to create a directory list array so that I can then check the list for a specfic directory name. I have not been able to find an example, nor do it succesfully. This is what I am supposing will work?; while(glob("*/")) { $_(@dirlist); } foreach $list(@dirlist) {...
  9. millimeter

    Selectively editing input value - Help Needed.

    I am able to remove various elements, including combinations of occurrences. Example: $someFileName ="text.txt"; $someFileName =~ s/(.txt)//g ; # remove ".txt" print "$someFileName"; Output is "text" However I have been unable to get working anyway of...
  10. millimeter

    making a formmail

    1. Do you program in Perl? 2. Do you have a basic formmail script running? 3. If so, it sould have an area where it specifies input names from the form, you would have $url = $in{"url"}; or it parses all input from the form. Simply make sure there are input fields in your form for...
  11. millimeter

    How can you remove new lines when using <<SAVING;

    Thanks Krel... that was the solution. The reason I used it is because when I first started learning I used it successfully for multi-line and never ran into any reasons to try anything else till now... still learning! Thanks.[thumbsup2]
  12. millimeter

    How can you remove new lines when using <<SAVING;

    When using the following routine I am getting a new line in the text file I am writing. Anyway to prevent this; $somevalue= $in{&quot;somevalue&quot;}; chomp ($somevalue); open(HEADINGFILE, &quot;>filename.txt&quot;); print HEADINGFILE <<SAVING; $somevalue SAVING close(HEADINGFILE);

Part and Inventory Search

Back
Top