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 Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  1. sdslrn123

    Exiting out of a loop?

    Getting a bit stuck. Would appreciate any help? Thanks I have a list of names. Each name corresponds to a profile on a txt document. Each txt document profile contains a section called address I am only interested in those names that are in Texas as well as those specifically in Austin...
  2. sdslrn123

    LWP::Simple Module (Check content or die)

    Thank You to everyone.
  3. sdslrn123

    LWP::Simple Module (Check content or die)

    Hi I feel bad as everyone is helping but... I'll just rephrase original query. How do I remove lines within a text file containing lines starting with the word "hobbies" and those hobby lines containing football into another text file using LWP::Simple module Thanks again
  4. sdslrn123

    LWP::Simple Module (Check content or die)

    use LWP::Simple; open (HELLO, ">>thanks.txt"); foreach $person (@group) { my $url = "http://www.domain.com/$person.txt"; my $content = get $url; print HELLO $content; Sorry, I was just typing fast. Original problem still exists.
  5. sdslrn123

    LWP::Simple Module (Check content or die)

    The website is my personal one which I just use to practice perl on thus the invented website name. Any help is much appreciated.
  6. sdslrn123

    LWP::Simple Module (Check content or die)

    use LWP::Simple; open (HELLO, ">>thanks.txt"); foreach $person (@group) { my $url = "http:domain/$person.txt"; my $content = get $url; print HELLO $content; @group contains list of names. Hi there. The file from the website contains lots of details but I am just interested in the line that...
  7. sdslrn123

    What is this doing?

    I knew I came across this somehwere...hehe Thanks, found it. :o)
  8. sdslrn123

    What is this doing?

    What is the last line doing? I understand the rest? Where did $families come from? while(<SARACEN>) { chomp; my ($family, $people) = split (/=/, $_); my @members = (split /,\s*/, $people); foreach my $member (@members) { push @{$people{$member}}, $family...
  9. sdslrn123

    What does the following mean?

    Sorry, my fault, I am just trying to figure out what the whole line means?
  10. sdslrn123

    What does the following mean?

    print FILE if ++$count{$_} < 2; Does anyone know what is being printed to the filehandle FILE?
  11. sdslrn123

    Calculating Percentages in a Hash?

    Thanks. I do try and take on your advice to problem solve myself otherwise I am only cheating myself. Thanks again.
  12. sdslrn123

    Calculating Percentages in a Hash?

    Is there a way to calculate the total number of terms altogether within arrays of a hash. I know I have to divide the following scalar but I can't figure out how to group the total number of "family members" in all the "families" of the hash. print "$member can be found " ...
  13. sdslrn123

    Counting the matching terms of arrays within a Hash

    Basically my data is subject to change but will follow a format as follows where I will have a unique "Family Name" followed by "--" followed by various "family members". The contents of the data are unknown to me apart from the format: Data is a text file as follows: FLINTSTONES=BARNEY...
  14. sdslrn123

    Converting from Row to column

    A = 1 A = 2 A = 3 B = 5 B = 1 B = 7 e.t.c C = ..... Is there a way to convert this format to: A = 1,2,3 B = 5,1,7 C = ... . . . Z = ... I am thinking while in data file split each line to letters and numbers. if next letter matches previous letter push into an array otherwise create a...
  15. sdslrn123

    Counting but with two columns

    #!/usr/bin/perl @foo= ("apple","orange","pear","pear","mango","apple"); for (@foo) { $bar{$_}++; } while ( ($k,$v) = each %bar ) { if ($v =~ 1){ print "$k appears $v time\n"; } elsif ($v !=~ 1){ print "$k appears $v times\n"; } } The above code works nicely with a one column set of...
  16. sdslrn123

    How to create an array of numbers from 001 - 500

    The 001 element (3 figure configuration is important. Is this possible without having to type out all the numbers? I have tried @nums = (001 .. 500) with no success.
  17. sdslrn123

    Using CGI with Windows?

    Does anyone know have tips on how I can go about doing this?
  18. sdslrn123

    Opening a File on a Website in Text Format?

    THANK YOU!
  19. sdslrn123

    Opening a File on a Website in Text Format?

    LOL. Sorry, my mistake. It works!! Woo Hoo. My next challenge is creating a CGI form. THANK YOU EVERY1 and especially Raklet and PaulTEG! Stars All Around!
  20. sdslrn123

    Opening a File on a Website in Text Format?

    Thanks again Raklet. After printing out your and Paul' codes it definitely makes alot of sense. $pr = 1; $pr = 0; I still do not understand why these numbers are used. Is this a special case where 1 means something like true and 0 means something like false? But, you'll be pleased I have made...

Part and Inventory Search

Back
Top