Trying to get the field value to be dynamic. Any help much appreciated.
function update(name, value) {
window.opener.document.my_form.field[name].value = value;
}
Haven't seen much info on this. Basically I am nested several functions that will return a final result. Any consequences of doing it this way? Performance?
I have not see any examples like so. I understand perl is flexible. But in many cases 'flexible' doesn't mean correct.
Example:
my...
Just do this.
<script type="text/javascript">
<!--//
setFocus();
function setFocus(){
document.registrationFrm.submit();
}
//-->
</script>
or even better
<script type="text/javascript">
<!--//
document.registrationFrm.submit();
//-->
</script>
http://unixjunky.com
This will work for you.
#!/usr/bin/perl
use strict;
use File::Find;
my %size;
find(
sub {
$size{$File::Find::name} = -s if -f;
},
@ARGV
);
my @sorted = sort { $size{$b} <=> $size{$a} } keys %size;
splice @sorted, 20 if @sorted > 20;
foreach (@sorted) {
printf "%10d...
#!/usr/bin/perl -w
use strict;
chop( my $input = <STDIN> );
open FILE, "numbers.txt" or die $!;
while ( <FILE> ) {
if ( $_ =~ m/($input)/ ) {
print $_;
}
}
close FILE;
http://unixjunky.com
This should work. Enjoy!
#!/usr/bin/perl -w
use strict;
my $input = <STDIN>;
open FILE, "numbers.txt" or die $!;
while ( <FILE> ) {
if ( $_ =~ m/($input)/ ) {
print $_;
}
}
close FILE;
http://unixjunky.com
I think this is what you sare looking for
[code]
use CGI;
my $q = new CGI;
foreach my $key ( $q->param() ) {
my @params = $q->param($key);
my $value = join( ", ", @params );
print qq{ KEY: $key - VALUE: $value };
}
http://unixjunky.com
This would also help.. It's called using
<input type="button" value="Open Calendar" on
Click="loadXMLDoc(event, 'admin.pl?do=calendar&fwd=0')">
This works in everything but IE. IE is worthless!
http://unixjunky.com
I really hate IE.. Their support of the DOM truely sucks.
Trying to globalize the window.event so I can keep the functions seperate from each other. Anyone know why this doesn't work? or a CLEAN solution?
<script type="text/javascript">
//<![CDATA[ load the calendar using the XML object
var...
Taken from the MIME::Base64 docs.
"The number of characters to decode is not a multiple of 4. Legal base64 data should be padded with one or two "=" characters to make its length a multiple of 4. The decoded result will be the same whether the padding is present or not."
http://unixjunky.com
If your are trying to access MSN using perl the Net::Msmgr module basically has all the methods to do so.
http://search.cpan.org/~slstat/Net-Msmgr-0.16/Msmgr.pm
http://unixjunky.com
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.