小编use*_*663的帖子

我打算将两个变量传递给perl函数,其中一个可能是可选的.我试图检查第二个是否已定义,但它无法正常工作.当我将函数调用为myFunction(18)时,它假定变量$ optional已定义并转到else语句.但是在else语句中,当访问$ optional变量时,它会抛出"未初始化"错误.这与我的预期完全相反.任何帮助是极大的赞赏.

sub myFunction {
  my ($length, $optional) = (@_);
  if(undef($optional)
  {
    more code..
  }
  else
  {
    more code...
  }
}

myFunction(18)

我必须编写一个bash shell脚本来实现以下功能.从目录中获取所有文件的列表.在目标目录中,如果存在任何这些文件,则比较日期.仅当源文件比目标文件新时,才将文件直接复制到目标.必须为每个文件执行此操作.我创建了一个for循环来实现复制部分.但我需要帮助比较文件的日期.

谢谢

我想在Windows Web服务器上动态创建文件夹,以存储来自客户端计算机的上传文件.我打算使用作为asp.net成员资格模块的一部分创建的GUID值作为文件夹名称.由于chracters,/\*？<> |,不允许在Windows文件夹名称中,我想知道它们中的任何一个是否会成为GUID的一部分,因此会导致问题.

谢谢

我正在寻找一个Perl正则表达式，它将验证仅包含字母ACGT的字符串。例如，“ AACGGGTTA”应该有效，而“ AAYYGGTTA”应该无效，因为第二个字符串的“ YY”不是A，C，G，T字母之一。我有以下代码，但它同时验证了上述两个字符串

if($userinput =~/[A|C|G|T]/i)
{
    $validEntry = 1;
    print "Valid\n";
}

谢谢

我有一组自定义对象,依赖.自定义对象有大约70个属性.我想只提取一个属性,即membernumber.我有以下代码,我提取成员数并创建另一个列表:

var memberIDs = (from d in dependents
                            select new
                                   {
                                       d.MemberNum 
                                   });
            foreach(var id in memberIDs)
            {
                string idValue = id.ToString();
            }

问题是idValue是"{MemberNum = 20044782604}",而不仅仅是"20044782604".请让我知道如何解决它.

谢谢

我正在努力解决这个算法问题:

我如何编写一个theta(m+n)算法来打印m边,n-顶点有向图中每个顶点的入度和出度,其中有向图用相邻列表表示.

我从这个站点得到了帮助,将对象的数据写入制表符分隔的文本文件.它很棒.问题是它在文件的末尾添加了一个额外的空行.因此,拾取文件的过程失败.如果有办法阻止代码加上额外的行,请告诉我.以下是代码:

private void WriteFile<T>(string filePath, IEnumerable<T> objectlist, string userName, string password)
{

        bool createHeader = false;

        if (!File.Exists(filePath))
        {
            using (File.Create(filePath)) ;
            createHeader = true;
        }

        string data = ToCsv<T>("\t", objectlist, createHeader);
        var file = new StreamWriter(filePath, true);
        file.WriteLine(data);
        file.Close();

}

我正在开发一个 asp.net webform 项目。它有一个编辑表单，可以在几个文本和组合框中显示从数据库中检索到的成员数据。用户可以编辑这些项目中的任何一个。编辑完成后，当他们单击“验证”按钮时，将通过 Server.Transfer 方法将他们带到 verifyAndSave.aspx 页面。这个新页面有两个按钮：保存和取消。当他们单击“取消”按钮时，应将他们带回先前的页面，所有编辑过的数据都完好无损。对于取消按钮的点击事件，在后面的代码中，我再次使用了Server.transfer。它转到较早的页面，但问题是它只显示数据库中的数据。用户所做的任何编辑都消失了。但是，如果我使用后退按钮，我会看到用户所做的所有编辑。请让我知道如何正确实现取消按钮。

谢克

我想使用Perl DBI将值插入到Sqlite3表中.我能够毫无问题地插入硬编码值.当我尝试使用perl变量时,我得到一个错误"DBD :: SQLite :: db do failed:no such column:"

这有效:

$dbh->do("insert into Gene values (12, 'AAAAAA', 66, 86, 76)");

但是这段代码

$dbh->do("INSERT INTO Gene values (NULL, $sequence, $siteNumber, $begin, $length)");

抛出错误

DBD::SQLite::db do failed: no such column

我有一个关于通过引用Perl中的子例程的问题.对于值,如果我使用@_传递它可以工作但是对于ref只有shift工作.不知道为什么.我有以下示例代码:

这有效:

#! /usr/bin/perl

use strict;
use warnings;

my $name = 'John';
PassScalarByRef( \$name );

sub PassScalarByRef{
    my $got = shift;
    print "Hello $$got\n";
}

但不是这个:

#! /usr/bin/perl

use strict;
use warnings;

my $name = 'John';
PassScalarByRef( \$name );

sub PassScalarByRef{
    my $got = @_;
    print "Hello $$got\n";
}