the person who created our keys for ssl has left. We had to restart the server but ssl will not come up without entering the pass phase. Is there anything that can be done to remedy this being no one knows the passphase?
I have a perl cgi that I am trying execute a expect script from.
I set the expect script to www
in the perl script I
chdir() to the script path and
`expect ./script.exp`;
but it isnt running btw script.exp does run from the commandline so I am assuming I am having permission problems.
How...
what I want to do is find a pid.
Grep the number to a new variable ($PID)
then kill that process.
my broken attempt
set varReturned send -- "ps -A |grep rad\r"
set PID "$varReturned |grep ([0-9]*)"
send -- "sudo kill $PID\r"
it error says:
wrong # args: should be "set varName ?newValue?"...
what I am tring to accomplish, is create a sub that I can pass my custom error data.
I am looking for a better way of pulling it off.
error('error:',"Incorrect interface call should be 'RST'").die;
sub error{
print join("\n", @_)."\n";
}
Is there a flag that I can use to pass the line...
I cant seen to figure out how to access the the data in the DBI object and get it back in.
$Query_Statement="select fname,lname,address,city,state,zip,phone,email FROM main order by lname,fname;";
my $DataOut = $DBHandle->prepare($Query_Statement);
$DataOut->execute();
foreach my...
what is the best stradigy to use modules and the like based on platform?
ie
use Term::ANSIColor qw(:constants);
unix & os x
use Win32::Console::ANSI;
windows also requires this to display ansii color
I am using Config & $^O to determine the platform and use ifs to use certain platform...
ok here is my first DOTnet page is there a better way to do this?
<%@ Page Language="VB" %>
<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.SqlClient" %>
<html>
<head>
</head>
<body>
<script runat="server">
Function GetDataForYear(ByVal year As String)
Dim...
I am very new to asp.net and am looking for a tutorial/s to help me generate a webpage as follows.
---psudocode---
for (i = current.year; i >= 1999 ; i--){
print <h1>i</h>;
for (m = 1; m =< 12; m++){
if (myDataArray = get_year_&_month_records(y,m)){
print...
I have read that linked lists in perl are slow but I can't quite find an example of one.
Is this a linked list? If so how can I change it without losing any of the functionality?
#!/usr/bin/perl -w
use strict;
system('clear');
my @data;
$data[2] = 'hi there';
my %objREF;
$objREF{poker} =...
I want to alter the %find in my constructor from a accessor method.
package Excel::Tabbed;
use strict;
use Exporter();
our @ISA = qw(Exporter);
our @EXPORT = qw(connect);
our $VERSION = 1.00;
# ie new constructor
sub connect{
my $class = $_[0];
if (-e "$_[1]"){
my...
I have a cocoa GUI that recieves the user & password.
How do I send a command with expect like:
`login $user`
`sudo chmod 777 $file_path`;
`$password`;
is expect the way to go? Is there a differant standardized way of doing this?
Thanks
I need to parse some excel tab delimited files. I am NOT going to edit them just use them as a reference. The first row contains the column names and the first column each row is the id.
The files have various amounts of columns from 100 to 375 and as many rows as 700.
considering speed would...
I would like to be able to call the sub like this:
my @dirs = parseDir("perl");
but recursively calling the sub to populate the same array is causing me problems. Any suggestions?
#!/usr/bin/perl
use strict;
my (@dirs,@files);
parseDir("perl");
foreach my $item (@dirs){
print...
I have been fiddling with this trying to get XML::Simple to produce the correct xml file. It makes a file it just doesn't read it back in correctly.
my %t_type = (
...
'b' => {
a => {low => 1000, high => 3000, percent => 25},
b => {low => 200,high => 2000, percent => 30},
c => {low =>...
1. Is this the correct way to write this data structure? Suggestions?
2. How do I access the size of the 'disallowed' array?
3. What is the best way to foreach this array?
my %t_type = (
'a' => {
'chance' => {'low' => 2, 'high' => 12, 'percent' => 50},
'range'...
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.