On Tue, Feb 24, 2004 at 08:19:05PM +0100, Anthony Vanelverdinghe ([EMAIL PROTECTED]) wrote:
Bottom posting in the future would be much appreciated. > Thanks! > But the problem is the following: > the user has to enter an url and now i want to put "http://"; always in > front (and show it on the screen) so that the user doesn't have to enter > this everytime. > OK sorry, I'm at work and thought I saw a couple of quick questions I could answer. Below is another quick example of one way to handle what you are trying to do. I just threw the check in there in case a person actually typed http://http://whatever.com. I know that isn't very likely but ..... #!/usr/bin/perl use warnings; use strict; my $prefix = 'http://'; print "Enter URL http://";; chomp (my $url = <STDIN>); if ($url =~ /http:/) { print "$url\n"; } else { print "$prefix$url\n"; } > > >From: Kenton Brede <[EMAIL PROTECTED]> > >To: [EMAIL PROTECTED] > >Subject: Re: default value for input > >Date: Tue, 24 Feb 2004 13:05:09 -0600 > > > >On Tue, Feb 24, 2004 at 07:41:46PM +0100, Anthony Vanelverdinghe > >([EMAIL PROTECTED]) wrote: > >> Hi > >> > >> is it possible to give a default value to the input you're asking? I > >tried > >> the code below but this didn't work. > >> > >> $URL = "http://";; > >> chomp ($URL = $URL.<>); > > > >I've set up a default variable like the following but can't vouch for > >it being the proper way to do so. > > > >my $new_uid ||= '700'; # default to 700 if it doesn't exist. > >Kent > > > >-- > >"Efficiency is intelligent laziness." > > -David Dunham -- "Efficiency is intelligent laziness." -David Dunham -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
