This only demonstrates what I "think" you're trying to do, which is create a regex to match "list".#!/usr/bin/perl -w use strict; my @write = qw(my your); my $url = "list is your list"; foreach my $r (@write) { if ($url =~ /list/ ) { $r = 1; print "hello\n"; print "My R is $r\n"; } }
In reply to Re: Perl Problem
by Tuna
in thread Internal server error
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |